diff options
author | Glenn Morris <rgm@gnu.org> | 2007-04-10 03:58:03 +0000 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2007-04-10 03:58:03 +0000 |
commit | 17975ebf234f8ac8899397e5849cb5992bbfb52a (patch) | |
tree | 37cc59f1a042b5bcefd1155ac87ae59865b60487 | |
parent | ec448ae2df819739cd0dfed37db977c1aeafa2b5 (diff) | |
download | emacs-17975ebf234f8ac8899397e5849cb5992bbfb52a.tar.gz |
Markus Triska <markus.triska at gmx.at>:
(byte-optimize-char-before): Remove (move to bytecomp.el as
byte-compile-char-before).
-rw-r--r-- | lisp/ChangeLog | 5 | ||||
-rw-r--r-- | lisp/emacs-lisp/byte-opt.el | 8 |
2 files changed, 5 insertions, 8 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 99d9518beb7..3c4bad3c162 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2007-04-10 Glenn Morris <rgm@gnu.org> + + * dframe.el (dframe-frame-mode): Do not set auto-show-mode, since + it is obsolete and has no effect. + 2007-04-10 Markus Triska <markus.triska@gmx.at> * emacs-lisp/byte-opt.el (byte-optimize-char-before): Remove (move diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index 5215e6e9db7..a6e4d8a91e0 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el @@ -1137,14 +1137,6 @@ '(forward-word -1)) (t form))) -(put 'char-before 'byte-optimizer 'byte-optimize-char-before) -(defun byte-optimize-char-before (form) - (cond ((= 2 (safe-length form)) - `(char-after (1- ,(nth 1 form)))) - ((= 1 (safe-length form)) - '(char-after (1- (point)))) - (t form))) - ;; Fixme: delete-char -> delete-region (byte-coded) ;; optimize string-as-unibyte, string-as-multibyte, string-make-unibyte, ;; string-make-multibyte for constant args. |