Mercurial > hg > xemacs-beta
comparison lisp/package-ui.el @ 410:de805c49cfc1 r21-2-35
Import from CVS: tag r21-2-35
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:19:21 +0200 |
parents | 2f8bb876ab1d |
children | 697ef44129c6 |
comparison
equal
deleted
inserted
replaced
409:301b9ebbdf3b | 410:de805c49cfc1 |
---|---|
29 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 29 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
30 ;; User-changeable variables: | 30 ;; User-changeable variables: |
31 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 31 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
32 | 32 |
33 (defgroup pui nil | 33 (defgroup pui nil |
34 "Conventient interface to the package system." | 34 "Convenient interface to the package system." |
35 :group 'package-tools | 35 :group 'package-tools |
36 :tag "Package User interface" | 36 :tag "Package User interface" |
37 :prefix "pui-") | 37 :prefix "pui-") |
38 | 38 |
39 (defcustom pui-package-install-dest-dir nil | 39 (defcustom pui-package-install-dest-dir nil |
307 (if (member pkg-sym pui-deleted-packages) | 307 (if (member pkg-sym pui-deleted-packages) |
308 (setq pui-deleted-packages | 308 (setq pui-deleted-packages |
309 (delete pkg-sym pui-deleted-packages)) | 309 (delete pkg-sym pui-deleted-packages)) |
310 (setq pui-deleted-packages | 310 (setq pui-deleted-packages |
311 (cons pkg-sym pui-deleted-packages)) | 311 (cons pkg-sym pui-deleted-packages)) |
312 (setq pui-seleted-packages | 312 (setq pui-selected-packages |
313 (delete pkg-sym pui-selected-packages))) | 313 (delete pkg-sym pui-selected-packages))) |
314 (pui-update-package-display extent pkg-sym) | 314 (pui-update-package-display extent pkg-sym) |
315 )) | 315 )) |
316 | 316 |
317 | 317 |