Mercurial > emacs

changeset 12953:e0db27f18a43

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(m2-execute-monitor-command): Renamed from execute-monitor-command.
author Richard M. Stallman <rms@gnu.org>
date Sun, 27 Aug 1995 17:15:57 +0000
parents 0ad88e6d8ef1
children c0ab245f1750
files lisp/progmodes/modula2.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/modula2.el	Sun Aug 27 07:20:19 1995 +0000
+++ b/lisp/progmodes/modula2.el	Sun Aug 27 17:15:57 1995 +0000
@@ -398,7 +398,7 @@
 		     (setq m2-link-name (read-string "Name of executable: "
 						     modulename))))))
 
-(defun execute-monitor-command (command)
+(defun m2-execute-monitor-command (command)
   (let* ((shell shell-file-name)
 	 (csh (equal (file-name-nondirectory shell) "csh")))
     (call-process shell nil t t "-cf" (concat "exec " command))))
@@ -412,7 +412,7 @@
       (setq modulename
 	    (read-string "Module name: "))
       (switch-to-buffer "*Command Execution*")
-      (execute-monitor-command (concat "m2whereis " modulename))
+      (m2-execute-monitor-command (concat "m2whereis " modulename))
       (goto-char (point-min))
       (condition-case ()
 	  (progn (re-search-forward "\\(.*\\.def\\) *$")