bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: one big shell command then one small one and it's like pass the join


From: Kevin Rodgers
Subject: Re: one big shell command then one small one and it's like pass the joint, mon
Date: Fri, 21 Jun 2002 12:26:54 -0600
User-agent: Mozilla/5.0 (X11; U; SunOS i86pc; en-US; rv:0.9.4.1) Gecko/20020406 Netscape6/6.2.2

Dan Jacobson wrote:

Yet another bug.  You do one shell command with lots of output and
*Shell Command Output* appears as a bottom window.  A second shell
command with a little output then causes the minibuffer to appear with
the same content as *Shell Command Output* most unprofessionally in a
double vision repeated display.

C-x 1 <escape> ! s e q SPC 1 SPC 1 SPC 8 8 <return> <escape> ! s e q
SPC 1 SPC 1 SPC 4 <return>

If you were schmart you would say "Oh, I've already got *Shell Command
Output* up there, no point in making a big deal about it in the
minibuffer."  Of course we are adding complexity, but whos schmart
idea was it to make such a peppy minibuffer in the first place?


As the shell-command doc string and the ChangeLog entries both say, it is
displayed in the echo area, not the minibuffer:

Thu Sep 21 03:59:28 1989  Richard Stallman  (address@hidden)

        * simple.el (shell-command-on-region): If output is 1 line,
        display it in echo area.

Anyway, here's an untested patch to get the behavior you want:

*** emacs-20.7/lisp/simple.el.orig      Tue May  2 06:36:41 2000
--- emacs-20.7/lisp/simple.el   Fri Jun 21 12:14:56 2002
***************
*** 1346,1352 ****
"succeed" "fail")))
                   (kill-buffer buffer))
!                 ((= lines 1)
                   (message "%s"
                            (save-excursion
                              (set-buffer buffer)
--- 1346,1352 ----
"succeed" "fail")))
                   (kill-buffer buffer))
!                 ((and (= lines 1) (not (get-buffer-window buffer)))
                   (message "%s"
                            (save-excursion
                              (set-buffer buffer)


--
Kevin Rodgers <address@hidden>




reply via email to

[Prev in Thread] Current Thread [Next in Thread]