X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fobsolete.el;h=f0d54f528253dc53cc297f0b5d89157059e34efb;hb=9f4fd6e41f60e4ff7c286bb5e16e8e4555cd9349;hp=94f201f57d09f9e14cb64fbcdd3eb4e8bf87cad9;hpb=509f5effa5532b2c4abe09925702c395ec473c7e;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/obsolete.el b/lisp/obsolete.el
index 94f201f..f0d54f5 100644
--- a/lisp/obsolete.el
+++ b/lisp/obsolete.el
@@ -177,6 +177,8 @@ set Info-directory-list.")
   "This used to be the name of the user whose init file was read at startup.")
 (make-obsolete-variable 'init-file-user 'load-user-init-file-p)
 
+(define-obsolete-function-alias 'pui-add-install-directory
+  'pui-set-local-package-get-directory) ; misleading name
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;; hooks
 
 (make-compatible-variable 'lisp-indent-hook 'lisp-indent-function)
@@ -227,6 +229,9 @@ set Info-directory-list.")
 ;; Can't make this obsolete.  easymenu depends on it.
 (make-compatible 'add-menu 'add-submenu)
 
+(define-obsolete-function-alias 'package-get-download-menu 
+  'package-ui-download-menu)
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;; minibuffer
 
 (define-compatible-function-alias 'read-minibuffer