comparison lisp/cmdloop.el @ 1445:0117860e01eb

[xemacs-hg @ 2003-05-02 06:32:28 by stephent] message tweak <87wuh9uag0.fsf@tleepslib.sk.tsukuba.ac.jp>
author stephent
date Fri, 02 May 2003 06:32:29 +0000
parents 01c57eb70ae9
children 139afe9fb2ee
comparison
equal deleted inserted replaced
1444:d9d4999d5f5c 1445:0117860e01eb
162 (t 'command-error))) 162 (t 'command-error)))
163 (display-error error-object t) 163 (display-error error-object t)
164 164
165 (if (noninteractive) 165 (if (noninteractive)
166 (progn 166 (progn
167 (message "%s exiting.\n" emacs-program-name) 167 (message "\n%s exiting.\n" emacs-program-name)
168 (kill-emacs -1))) 168 (kill-emacs -1)))
169 t)) 169 t))
170 170
171 (defun describe-last-error () 171 (defun describe-last-error ()
172 "Redisplay the last error-message. See the variable `last-error'." 172 "Redisplay the last error-message. See the variable `last-error'."