Skip to content

Instantly share code, notes, and snippets.

View gist:0dde0f5d981d56a9157d43d437e93a2c
CL-USER> (ql:quickload :hunchentoot)
To load "hunchentoot":
Load 1 ASDF system:
hunchentoot
; Loading "hunchentoot"
/bin/sh: 1: Syntax error: ")" unexpected
View gist:2617129591dba8f236a27c809cbdd671
CL-USER> (ql:quickload :clx)
To load "clx":
Load 1 ASDF system:
clx
; Loading "clx"
.../bin/sh: 1: fd: not found
/bin/sh: 1: Syntax error: ")" unexpected
;
; caught ERROR:
; READ error during COMPILE-FILE:
View gist:2f420e7070105bcf32a311dedbb7f49c
CL-USER> (ql:quickload :esrap)
To load "esrap":
Load 1 ASDF system:
esrap
; Loading "esrap"
[package esrap]
; file: /home/alaa/quicklisp/dists/quicklisp/software/esrap-20220331-git/src/package.lisp
; in: DEFPACKAGE #:ESRAP
; (DEFPACKAGE #:ESRAP
View Capistrano-Deployment-Recipe.rb
# Guide
# Configure the essential configurations below and do the following:
#
# Repository Creation:
# cap deploy:repository:create
# git add .
# git commit -am "initial commit"
# git push origin master
#
# Initial Deployment:
View deploy.sh
#!/usr/bin/env bash
# Configuration
SERVER='myserver'
DEPLOY_TO='/path/to/app'
EXCLUDE='*.swp .git/ db/sphinx/ tmp/ log/'
DRY_RUN=false
DEPLOY_GEM_PATH='/opt/ec/ruby/1.8.7/lib/ruby/gems/1.8'
# To improve ssh performance, consider reusing connections:
View util.lisp
(defun make-upload-filename ()
(etypecase *upload-filename-generator*
;; the old behaviour.
(null t)
;; the new behaviour.
((or symbol function)
(lambda (&rest args)
(let ((filename (apply *upload-filename-generator* args)))
(when *file-upload-hook*
(funcall *file-upload-hook* filename))
@alaa-alawi
alaa-alawi / util.lisp.orig
Created May 21, 2012
implementation comparision
View util.lisp.orig
;; original implementation
;; hunchentoot;utils.lisp
;;
(let ((counter 0))
(declare (ignorable counter))
(defun make-tmp-file-name (&optional (prefix "hunchentoot"))
"Generates a unique name for a temporary file. This function is
called from the RFC2388 library when a file is uploaded."
(let ((tmp-file-name
#+:allegro