From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Katsumi Yamaoka Newsgroups: gmane.emacs.devel Subject: silence whitespace-cleanup Date: Wed, 11 Jun 2003 11:08:22 +0900 Organization: Emacsen advocacy group Sender: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Message-ID: NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: main.gmane.org 1055297273 17740 80.91.224.249 (11 Jun 2003 02:07:53 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Wed, 11 Jun 2003 02:07:53 +0000 (UTC) Original-X-From: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Wed Jun 11 04:07:51 2003 Return-path: Original-Received: from quimby.gnus.org ([80.91.224.244]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 19Pv1j-0004bz-00 for ; Wed, 11 Jun 2003 04:07:51 +0200 Original-Received: from monty-python.gnu.org ([199.232.76.173]) by quimby.gnus.org with esmtp (Exim 3.12 #1 (Debian)) id 19PvMV-0003GD-00 for ; Wed, 11 Jun 2003 04:29:19 +0200 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.20) id 19Pv2m-0003C3-IN for emacs-devel@quimby.gnus.org; Tue, 10 Jun 2003 22:08:56 -0400 Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.20) id 19Pv2T-0003Bw-Hs for emacs-devel@gnu.org; Tue, 10 Jun 2003 22:08:37 -0400 Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.20) id 19Pv2S-0003Bl-1n for emacs-devel@gnu.org; Tue, 10 Jun 2003 22:08:36 -0400 Original-Received: from [139.81.176.2] (helo=washington.hostforweb.net) by monty-python.gnu.org with esmtp (Exim 4.20) id 19Pv2R-00038J-LG for emacs-devel@gnu.org; Tue, 10 Jun 2003 22:08:35 -0400 Original-Received: from yamaoka by washington.hostforweb.net with local (Exim 3.36 #1) id 19Pv2R-0002Ls-00; Tue, 10 Jun 2003 22:08:36 -0400 Original-To: emacs-devel@gnu.org X-Face: #kKnN,xUnmKia.'[pp`; Omh}odZK)?7wQSl"4o04=EixTF+V[""w~iNbM9ZL+.b*_CxUmFk B#Fu[*?MZZH@IkN:!"\w%I_zt>[$nm7nQosZ<3eu; B:$Q_:p!',P.c0-_Cy[dz4oIpw0ESA^D*1Lw= L&i*6&( User-Agent: Gnus/5.1003 (Gnus v5.10.3) Emacs/21.3.50 (gnu/linux) Cancel-Lock: sha1:yrZ0ig6cuP2/lbEHL54ECvk8Suk= X-Payment: hashcash 1.2 0:030611:emacs-devel@gnu.org:45c8d7767bfc766d X-Hashcash: 0:030611:emacs-devel@gnu.org:45c8d7767bfc766d X-Virus-Scanned-By: Amavis with CLAM Anti Virus on washington.hostforweb.net X-AntiAbuse: This header was added to track abuse, please include it with any abuse report X-AntiAbuse: Primary Hostname - washington.hostforweb.net X-AntiAbuse: Original Domain - gnu.org X-AntiAbuse: Originator/Caller UID/GID - [32041 32041] / [32041 32041] X-AntiAbuse: Sender Address Domain - washington.hostforweb.net X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1b5 Precedence: list List-Id: Emacs development discussions. List-Help: List-Post: List-Subscribe: , List-Archive: List-Unsubscribe: , Errors-To: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Xref: main.gmane.org gmane.emacs.devel:15017 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:15017 Hi, I request to silence the whitespace-cleanup function when the texinfo-format-scan function is performed. We have only the way to use the texinfmt.el module to make Japanese info pages. However, it is too loud to find important problems. For instance: Formatting: The Gnus Newsreader ... /Work/gnus/texi/gnus clean /Work/gnus/texi/gnus clean /Work/gnus/texi/gnus clean /Work/gnus/texi/gnus clean /Work/gnus/texi/gnus clean /Work/gnus/texi/gnus clean /Work/gnus/texi/gnus clean [...] Here is a patch: *** lisp/whitespace.el~ Tue May 13 22:38:43 2003 --- lisp/whitespace.el Wed Jun 11 02:06:37 2003 *************** *** 517,523 **** (whitespace-buffer)))) ;;;###autoload ! (defun whitespace-cleanup () "Cleanup the five different kinds of whitespace problems. Use \\[describe-function] whitespace-describe to read a summary of the --- 517,523 ---- (whitespace-buffer)))) ;;;###autoload ! (defun whitespace-cleanup (&optional quiet) "Cleanup the five different kinds of whitespace problems. Use \\[describe-function] whitespace-describe to read a summary of the *************** *** 568,574 **** (if whitespace-any (whitespace-cleanup) (progn ! (message "%s clean" buffer-file-name) (whitespace-update-modeline))) (setq tab-width whitespace-tabwith-saved)))) --- 568,575 ---- (if whitespace-any (whitespace-cleanup) (progn ! (if (not quiet) ! (message "%s clean" buffer-file-name)) (whitespace-update-modeline))) (setq tab-width whitespace-tabwith-saved)))) *** lisp/textmodes/texinfmt.el~ Tue Feb 11 22:13:39 2003 --- lisp/textmodes/texinfmt.el Wed Jun 11 02:06:37 2003 *************** *** 935,941 **** (error "Unterminated @%s" (car (car texinfo-stack))))) ;; Remove excess whitespace ! (whitespace-cleanup)) (defvar texinfo-copying-text "" "Text of the copyright notice and copying permissions.") --- 935,941 ---- (error "Unterminated @%s" (car (car texinfo-stack))))) ;; Remove excess whitespace ! (whitespace-cleanup t)) (defvar texinfo-copying-text "" "Text of the copyright notice and copying permissions.")