mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-05 11:45:45 +00:00
Code Issues Releases Activity

Fix indentation.

Browse Source
This commit is contained in:
Richard M. Stallman 1994-09-21 19:05:52 +00:00
parent cacc3e2c4b
commit fe213bf888
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/progmodes/compile.el
View File

@ -1088,9 +1088,9 @@ Selects a window with point at SOURCE, with another window displaying ERROR."
(set-window-start w marker))
(setq name
(expand-file-name
(read-file-name
(format "Find this error in: (default %s) "
filename) dir filename t)))
(read-file-name (format "Find this error in: (default %s) "
filename)
dir filename t)))
(if (file-directory-p name)
(setq name (concat (file-name-as-directory name) filename)))
(if (file-exists-p name)