Index: emacs/lisp/progmodes/f90.el
diff -c emacs/lisp/progmodes/f90.el:1.83 emacs/lisp/progmodes/f90.el:1.84
*** emacs/lisp/progmodes/f90.el:1.83 Mon Jul 4 16:59:19 2005
--- emacs/lisp/progmodes/f90.el Sat Jul 16 18:42:26 2005
***************
*** 1790,1796 ****
(let (char event)
(if (fboundp 'next-command-event) ; XEmacs
(setq event (next-command-event)
! char (event-to-character event))
(setq event (read-event)
char event))
;; Insert char if not equal to `?', or if abbrev-mode is off.
--- 1790,1797 ----
(let (char event)
(if (fboundp 'next-command-event) ; XEmacs
(setq event (next-command-event)
! char (and (fboundp 'event-to-character)
! (event-to-character event)))
(setq event (read-event)
char event))
;; Insert char if not equal to `?', or if abbrev-mode is off.
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
