(shell-command): Undo last change.

c2020c27 · Stefan Monnier · dd631e8a · c2020c27
Commit c2020c27 authored May 16, 2003 by Stefan Monnier
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

lisp/simple.el lisp/simple.el +1 -1

No files found.
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1348,7 +1348,7 @@ specifies the value of ERROR-BUFFER."
 		  (setq proc (start-process "Shell" buffer shell-file-name
 					    shell-command-switch command))
 		  (setq mode-line-process '(":%s"))
-		  (shell-mode)
+		  (require 'shell) (shell-mode)
 		  (set-process-sentinel proc 'shell-command-sentinel)
 		  ))
 	    (shell-command-on-region (point) (point) command