[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/byte-opt.el [emacs-unicode-2]

[Miles Bader]

Index: emacs/lisp/emacs-lisp/byte-opt.el
diff -c emacs/lisp/emacs-lisp/byte-opt.el:1.73.4.2 
emacs/lisp/emacs-lisp/byte-opt.el:1.73.4.3
*** emacs/lisp/emacs-lisp/byte-opt.el:1.73.4.2  Fri Apr 16 12:50:13 2004
--- emacs/lisp/emacs-lisp/byte-opt.el   Thu Oct 14 08:50:01 2004
***************
*** 1152,1158 ****
              (numberp (nth 1 form)))
         (list 'forward-word (eval (- (nth 1 form)))))
        ((= 1 (safe-length form))
!        '(forward-char -1))
        (t form)))
  
  (put 'char-before 'byte-optimizer 'byte-optimize-char-before)
--- 1152,1158 ----
              (numberp (nth 1 form)))
         (list 'forward-word (eval (- (nth 1 form)))))
        ((= 1 (safe-length form))
!        '(forward-word -1))
        (t form)))
  
  (put 'char-before 'byte-optimizer 'byte-optimize-char-before)