procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Jumping up to new revision.

Browse source 
Simplify definition of defalias for Emacs 18.
This commit is contained in:
Daniel LaLiberte 1994-04-09 22:19:10 +00:00
parent d8b3a65d6c
commit 4633707b6b
1 changed files with 8 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
lisp/emacs-lisp/cust-print.el
View file

@ -9,12 +9,7 @@
;; LCD Archive Entry:
;; cust-print|Daniel LaLiberte|liberte@cs.uiuc.edu
;; |Handle print-level, print-circle and more.
;; |$Date: 1994/03/24 20:26:05 $|1.5|
;; Version 1.5 ($Revision: 1.13 $ from Emacs 19)
;; Emacs maintainers: please inform me of any changes to this code.
;; Better yet, ask me first.
;; |$Date: 1994/04/05 21:05:09 $|$Revision: 1.14 $|
;; This file is part of GNU Emacs.
@ -33,7 +28,11 @@
;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
;;; ===============================
;;; $Header: $
;;; $Log: cust-print.el,v $
;;; Revision 1.14 1994/04/05 21:05:09 liberte
;;; Change install- and uninstall- to -install and -uninstall.
;;;
;;; Revision 1.13 1994/03/24 20:26:05 liberte
;;; Change "internal" to "original" throughout.
;;; (add-custom-printer, delete-custom-printer) replace customizers.
@ -162,9 +161,8 @@
;; Emacs 18 doesnt have defalias.
;; Provide def for byte compiler.
(defun defalias (symbol func) (fset symbol func))
;; Better def when loaded.
(or (fboundp 'defalias) (fset 'defalias 'fset))
(eval-and-compile
(or (fboundp 'defalias) (fset 'defalias 'fset)))
;; Variables:
@ -724,3 +722,4 @@ See `custom-format' for the details."
(provide 'cust-print)
;;; cust-print.el ends here