Mercurial > hg > xemacs-beta
comparison lisp/package-admin.el @ 243:f220cc83d72e r20-5b20
Import from CVS: tag r20-5b20
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:17:07 +0200 |
parents | 89ec2bb86eea |
children | ca9a9ec9c1c1 |
comparison
equal
deleted
inserted
replaced
242:fc816b73a05f | 243:f220cc83d72e |
---|---|
41 ;;;###autoload | 41 ;;;###autoload |
42 (defun package-admin-add-single-file-package (file destdir &optional pkg-dir) | 42 (defun package-admin-add-single-file-package (file destdir &optional pkg-dir) |
43 "Install a single file Lisp package into XEmacs package hierarchy. | 43 "Install a single file Lisp package into XEmacs package hierarchy. |
44 `file' should be the full path to the lisp file to install. | 44 `file' should be the full path to the lisp file to install. |
45 `destdir' should be a simple directory name. | 45 `destdir' should be a simple directory name. |
46 The optional `pkg-dir' can be used to override the default package hiearchy | 46 The optional `pkg-dir' can be used to override the default package hierarchy |
47 \(last package-path)." | 47 \(last package-path)." |
48 (interactive "fLisp File: \nsDestination: ") | 48 (interactive "fLisp File: \nsDestination: ") |
49 (when (null pkg-dir) | 49 (when (null pkg-dir) |
50 (setq pkg-dir (cadr package-path))) | 50 (setq pkg-dir (cadr package-path))) |
51 (let ((destination (concat pkg-dir "/lisp/" destdir)) | 51 (let ((destination (concat pkg-dir "/lisp/" destdir)) |