/[emacs]/emacs/lisp/progmodes/compile.el
ViewVC logotype

Diff of /emacs/lisp/progmodes/compile.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.251 by rms, Mon Mar 25 00:39:41 2002 UTC revision 1.252 by rms, Thu Mar 28 18:28:24 2002 UTC
# Line 1148  Turning the mode on runs the normal hook Line 1148  Turning the mode on runs the normal hook
1148      ;; later on.      ;; later on.
1149      (goto-char omax)      (goto-char omax)
1150      (insert ?\n mode-name " " (car status))      (insert ?\n mode-name " " (car status))
1151        (if (and (numberp compilation-window-height)
1152                 (zerop compilation-window-height))
1153            (message "%s" (cdr status)))
1154      (if (bolp)      (if (bolp)
1155          (forward-char -1))          (forward-char -1))
1156      (insert " at " (substring (current-time-string) 0 19))      (insert " at " (substring (current-time-string) 0 19))

Legend:
Removed from v.1.251  
changed lines
  Added in v.1.252

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26