mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-02 13:41:30 -08:00
Code Issues Projects Releases Wiki Activity

(remote-compile): Set comint-file-name-prefix in the compilation buffer.

Browse source
This commit is contained in:
Roland McGrath 1994-02-07 19:08:31 +00:00
parent e08d3f7ca5
commit 2559d4f338
1 changed files with 7 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lisp/rcompile.el
View file

@ -1,6 +1,6 @@
;;; rcompile.el Run a compilation on a remote machine
;;; Copyright (C) 1993 Free Software Foundation, Inc.
;;; Copyright (C) 1993, 1994 Free Software Foundation, Inc.
;; Author: Albert <alon@milcse.rtsg.mot.com>
;; Maintainer: FSF
@ -163,6 +163,11 @@ See \\[compile]."
compile-command)))
(setq remote-compile-host host)
(save-some-buffers nil nil)
(compile-internal compile-command "No more errors")))
(compile-internal compile-command "No more errors")
;; Set comint-file-name-prefix in the compilation buffer so
;; compilation-parse-errors will find referenced files by ange-ftp.
(save-excursion
(set-buffer compilation-last-buffer)
(setq comint-file-name-prefix (concat "/" host ":")))))
;;; rcompile.el ends here