Mercurial > hg > xemacs-beta

comparison lisp/package-get.el @ 628:e545f3ec2337

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2001-07-14 08:42:16 by youngs] 2001-07-14 Sean MacLennan <seanm@storm.ca> * package-admin.el (package-install-hook): New. (package-delete-hook): New. (package-admin-add-single-file-package): Use package-delete-hook. * package-get.el (package-get): Use package-install-hook.
author youngs
date Sat, 14 Jul 2001 08:42:17 +0000
parents 7039e6323819
children a6c89d799f00
comparison
equal deleted inserted replaced
627:a813963500d8 628:e545f3ec2337
863 ;; package-get-init-package are seen, below. 863 ;; package-get-init-package are seen, below.
864 (clear-message) 864 (clear-message)
865 (if (package-get-init-package (package-admin-get-lispdir 865 (if (package-get-init-package (package-admin-get-lispdir
866 install-dir package)) 866 install-dir package))
867 (progn 867 (progn
868 (run-hook-with-args 'package-install-hook package install-dir)
868 (message "Added package `%s'" package) 869 (message "Added package `%s'" package)
869 (sit-for 0) 870 (sit-for 0)
870 ) 871 )
871 (progn 872 (progn
872 ;; display message only if there isn't already one. 873 ;; display message only if there isn't already one.