Mercurial > emacs

comparison etc/ledit.l @ 49600:23a1cea22d13

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Trailing whitespace deleted.
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 04 Feb 2003 14:56:31 +0000
parents 19880a4faa73
children 695cf19ef79e
comparison
equal deleted inserted replaced
49599:5ade352e8d1c 49600:23a1cea22d13
87 (format ofile "(switch-to-buffer \"LEDIT\")~ 87 (format ofile "(switch-to-buffer \"LEDIT\")~
88 (erase-buffer)") 88 (erase-buffer)")
89 (format ofile "(insert-file \"~A\")" 89 (format ofile "(insert-file \"~A\")"
90 *ledit-ppfile*) 90 *ledit-ppfile*)
91 (format ofile "(lisp-mode)")) 91 (format ofile "(lisp-mode)"))
92 92
93 (t (format t "~&~A -- unknown option~%" (cdr args)))) 93 (t (format t "~&~A -- unknown option~%" (cdr args))))
94 (close ofile)))) 94 (close ofile))))
95 95
96 ;;; LISZT* 96 ;;; LISZT*
97 ;;; Need this guy to do compile-input. 97 ;;; Need this guy to do compile-input.