put this in your .emacs
(push `(("\\.asd\\'" . "ASDF Skeleton") "System Name: " " (eval-when (:compile-toplevel :load-toplevel :execute) (unless (find-package :" str ".system) (defpackage :" str ".system (:use :common-lisp :asdf)))) (in-package :" str ".system) (defsystem :" str" :description " ?\" (read-string "Description: ") ?\"" :author \"" (user-full-name) " <" user-mail-address ">\" :licence \"" (read-string "License: ") "\" :version \"" (read-string "Version: ") "\" :components (()) :depends-on ())") auto-insert-alist)
GNU Emacs ASDF