mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-26 07:33:47 +00:00
Code Issues Releases Activity

(shell-command): Undo last change.

Browse Source
This commit is contained in:
Stefan Monnier 2003-05-16 21:17:52 +00:00
parent dd631e8aec
commit c2020c27ff
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/simple.el
View File

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