aboutsummaryrefslogtreecommitdiffstats
path: root/lib/tools/emacs
diff options
context:
space:
mode:
authorBozhidar Batsov <[email protected]>2016-12-15 09:48:45 +0200
committerDan Gudmundsson <[email protected]>2017-02-08 12:49:05 +0100
commitee58b081ffadf4f96454d9c61031b590689ee420 (patch)
treeb2c57a4632808cc1868fcbd35ed77e3df14dc34d /lib/tools/emacs
parent4a32cffdc296a9bcdd412e231bddfb5ca28e34e9 (diff)
downloadotp-ee58b081ffadf4f96454d9c61031b590689ee420.tar.gz
otp-ee58b081ffadf4f96454d9c61031b590689ee420.tar.bz2
otp-ee58b081ffadf4f96454d9c61031b590689ee420.zip
Remove some unneeded backward compatibility code
Diffstat (limited to 'lib/tools/emacs')
-rw-r--r--lib/tools/emacs/erlang.el23
1 files changed, 0 insertions, 23 deletions
diff --git a/lib/tools/emacs/erlang.el b/lib/tools/emacs/erlang.el
index 10b3031f0b..a065e527b3 100644
--- a/lib/tools/emacs/erlang.el
+++ b/lib/tools/emacs/erlang.el
@@ -1312,29 +1312,6 @@ replaced by `erlang-etags-tags-completion-table'.")
;;; Avoid errors while compiling this file.
-;; `eval-when-compile' is not defined in Emacs 18. We define it as a
-;; no-op.
-(or (fboundp 'eval-when-compile)
- (defmacro eval-when-compile (&rest rest) nil))
-
-;; These umm...functions are new in Emacs 20. And, yes, until version
-;; 19.27 Emacs backquotes were this ugly.
-
-(or (fboundp 'unless)
- (defmacro unless (condition &rest body)
- "(unless CONDITION BODY...): If CONDITION is false, do BODY, else return nil."
- `((if (, condition) nil ,@body))))
-
-(or (fboundp 'when)
- (defmacro when (condition &rest body)
- "(when CONDITION BODY...): If CONDITION is true, do BODY, else return nil."
- `((if (, condition) (progn ,@body) nil))))
-
-(or (fboundp 'char-before)
- (defmacro char-before (&optional pos)
- "Return the character in the current buffer just before POS."
- `( (char-after (1- (or ,pos (point)))))))
-
;; defvar some obsolete variables, which we still support for
;; backwards compatibility reasons.
(eval-when-compile