diff options
| author |   Ulrich Müller <ulm@gentoo.org> | 2007-10-22 07:53:20 +0000 |
|---|---|---|
| committer | Ulrich Müller <ulm@gentoo.org> | 2007-10-22 07:53:20 +0000 |
| commit | e351ef44621e5bc2f89597b41fb6424b05d7b80c (patch) | |
| tree | ccd957ed2a892509c0e701999c1114f1fc7c8bc7 /app-emacs/slime/files | |
| parent | version bump (bug #195270) (diff) | |
| download | gentoo-2-e351ef44621e5bc2f89597b41fb6424b05d7b80c.tar.gz gentoo-2-e351ef44621e5bc2f89597b41fb6424b05d7b80c.tar.bz2 gentoo-2-e351ef44621e5bc2f89597b41fb6424b05d7b80c.zip | |
Sync swank.asd from Gentoo Lisp overlay.
(Portage version: 2.1.3.15)
Diffstat (limited to 'app-emacs/slime/files')
| -rw-r--r-- | app-emacs/slime/files/swank.asd | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/app-emacs/slime/files/swank.asd b/app-emacs/slime/files/swank.asd index 3288ae8b0227..e1b6c8fa74d1 100644 --- a/app-emacs/slime/files/swank.asd +++ b/app-emacs/slime/files/swank.asd @@ -5,7 +5,8 @@ #:asdf)) (defpackage #:swank-loader - (:use #:common-lisp)) + (:use #:common-lisp) + (:export #:*source-directory*)) (in-package #:swank-system) @@ -60,11 +61,11 @@ #+ecl (define-swank-system "swank-ecl" "swank-gray") -(defparameter swank-loader::*source-directory* - (asdf:component-pathname (asdf:find-system :swank))) - (in-package #:swank-loader) +(defparameter *source-directory* + (asdf:component-pathname (asdf:find-system :swank))) + (defun load-user-init-file () "Load the user init file, return NIL if it does not exist." (load (merge-pathnames (user-homedir-pathname) |