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

diff --git a/lisp/obsolete.el b/lisp/obsolete.el
index 94f201f..2cb8043 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
@@ -264,6 +269,9 @@ set Info-directory-list.")
 (define-compatible-function-alias 'assq-delete-all
   'remassq) ;GNU 21.1
 
+(define-compatible-function-alias 'line-beginning-position 'point-at-bol)
+(define-compatible-function-alias 'line-end-position 'point-at-eol)
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;; modeline
 
 (define-compatible-function-alias 'redraw-mode-line 'redraw-modeline)