From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Andreas Politz Newsgroups: gmane.emacs.help Subject: Re: ^M chars in *Async Command Output* Date: Sat, 24 Jan 2009 09:25:51 +0100 Organization: FH-Trier Message-ID: <1232785614.653196@arno.fh-trier.de> References: <1232703501.688012@arno.fh-trier.de> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit X-Trace: ger.gmane.org 1232786449 12964 80.91.229.12 (24 Jan 2009 08:40:49 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Sat, 24 Jan 2009 08:40:49 +0000 (UTC) To: help-gnu-emacs@gnu.org Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Sat Jan 24 09:42:02 2009 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1LQe5W-0007zD-Ma for geh-help-gnu-emacs@m.gmane.org; Sat, 24 Jan 2009 09:41:58 +0100 Original-Received: from localhost ([127.0.0.1]:44975 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1LQe4F-0002Qy-1q for geh-help-gnu-emacs@m.gmane.org; Sat, 24 Jan 2009 03:40:39 -0500 Original-Path: news.stanford.edu!newsfeed.stanford.edu!newsserver.news.garr.it!kanaga.switch.ch!switch.ch!news.belwue.de!news.uni-kl.de!not-for-mail Original-Newsgroups: gnu.emacs.help Original-Lines: 32 Original-NNTP-Posting-Host: 143-93-54-11.arno.fh-trier.de Original-X-Trace: news.uni-kl.de 1232785680 5682 143.93.54.11 (24 Jan 2009 08:28:00 GMT) Original-X-Complaints-To: usenet@news.uni-kl.de Original-NNTP-Posting-Date: Sat, 24 Jan 2009 08:28:00 +0000 (UTC) User-Agent: Mozilla-Thunderbird 2.0.0.17 (X11/20081018) In-Reply-To: Cache-Post-Path: arno.fh-trier.de!unknown@dslb-084-059-223-043.pools.arcor-ip.net X-Cache: nntpcache 3.0.1 (see http://www.nntpcache.org/) Original-Xref: news.stanford.edu gnu.emacs.help:166277 X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:61600 Archived-At: Sebastian Tennant wrote: > Quoth Sebastian Tennant : >> A function; (comint-carriage-motion), and a variable; >> comint-inhibit-carriage-motion, exist precisely for this purpose. >> >> How best to apply them to buffer *Async Command Output* is something I'm >> still working on. > > And it turns out neither of these are any help! > > The best (shortest) solution I can find is this: > > (add-hook 'shell-mode-hook > (lambda () > (when (equal (buffer-name (current-buffer)) "*Async Shell Command*") > (set-process-filter proc 'comint-output-filter)))) > > It's ugly, (proc is a local variable!), but short of patching > shell-command it does the trick for now. > > Sebastian It's better than what I first came up with. Anyway, the local variable is not nessecary. (defun shell-command-filter-hook nil "Filter all shell command output via `comint-output-filter'." (let ((proc (get-buffer-process "*Async Shell Command*"))) (when proc (set-process-filter proc 'comint-output-filter)))) -ap