Mercurial > hg > xemacs-beta

comparison lisp/prim/advocacy.el @ 24:4103f0995bd7 r19-15b95

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b95
author cvs
date Mon, 13 Aug 2007 08:51:03 +0200
parents 0293115a14e9
children 131b0175ea99
comparison
equal deleted inserted replaced
23:0edd3412f124 24:4103f0995bd7
67 67
68 ;;;###autoload 68 ;;;###autoload
69 (defun praise-be-unto-emacs (&optional arg) 69 (defun praise-be-unto-emacs (&optional arg)
70 (interactive "_p") 70 (interactive "_p")
71 (error "Obsolete function. Use `praise-be-unto-xemacs'.")) 71 (error "Obsolete function. Use `praise-be-unto-xemacs'."))
72 (make-obsolete 'praise-be-unto-emacs "use praise-be-unto-xemacs") 72 (make-compatible 'praise-be-unto-emacs "use praise-be-unto-xemacs")
73 73
74 ;;;###autoload 74 ;;;###autoload
75 (defun all-hail-xemacs (&optional arg) 75 (defun all-hail-xemacs (&optional arg)
76 "All Hail XEmacs!" 76 "All Hail XEmacs!"
77 (interactive "_p") 77 (interactive "_p")
79 79
80 ;;;###autoload 80 ;;;###autoload
81 (defun all-hail-emacs (&optional arg) 81 (defun all-hail-emacs (&optional arg)
82 (interactive "_p") 82 (interactive "_p")
83 (error "Obsolete function. Use `all-hail-xemacs'.")) 83 (error "Obsolete function. Use `all-hail-xemacs'."))
84 (make-obsolete 'all-hail-emacs "use all-hail-xemacs") 84 (make-compatible 'all-hail-emacs "use all-hail-xemacs")
85
86 ;;; advocacy.el ends here