X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Fpackage-get.el;h=8498bfc3588425c43743a9832b9f26a7570f96de;hp=954d099bcc29d872e5eddeeb7a2dd601e70cb139;hb=02f4d2761a98c5cb9d5b423d2361160a5d8c9ee4;hpb=041e98cf4c48018877365e3bfb37cfc09b54cc6d;ds=sidebyside

diff --git a/lisp/package-get.el b/lisp/package-get.el
index 954d099..8498bfc 100644
--- a/lisp/package-get.el
+++ b/lisp/package-get.el
@@ -865,6 +865,7 @@ successfully installed but errors occurred during initialization, or
 	      (if (package-get-init-package (package-admin-get-lispdir
 					     install-dir package))
 		  (progn
+		    (run-hook-with-args 'package-install-hook package install-dir)
 		    (message "Added package `%s'" package)
 		    (sit-for 0)
 		    )
@@ -950,7 +951,7 @@ Returns the modified PACKAGE-LIST.  Any missing fields are created."
 (defun package-get-staging-dir (filename)
   "Return a good place to stash FILENAME when it is retrieved.
 Use `package-get-dir' for directory to store stuff.
-Creates `package-get-dir'  it it doesn't exist."
+Creates `package-get-dir'  if it doesn't exist."
   (interactive "FPackage filename: ")
   (if (not (file-exists-p package-get-dir))
       (make-directory package-get-dir))