summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/progmodes/modula2.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/modula2.el b/lisp/progmodes/modula2.el
index ada150732c3..c80fbab844b 100644
--- a/lisp/progmodes/modula2.el
+++ b/lisp/progmodes/modula2.el
@@ -398,7 +398,7 @@ FROM SysStreams IMPORT sysIn, sysOut, sysErr;
(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 @@ FROM SysStreams IMPORT sysIn, sysOut, sysErr;
(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\\) *$")