From debbugs-submit-bounces@debbugs.gnu.org Sun Jan 10 22:22:27 2010 Received: (at submit) by debbugs.gnu.org; 11 Jan 2010 03:22:27 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1NUArK-0005Ji-M6 for submit@debbugs.gnu.org; Sun, 10 Jan 2010 22:22:26 -0500 Received: from fencepost.gnu.org ([140.186.70.10]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1NUArJ-0005JP-2S for submit@debbugs.gnu.org; Sun, 10 Jan 2010 22:22:25 -0500 Received: from mail.gnu.org ([199.232.76.166]:33942 helo=mx10.gnu.org) by fencepost.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1NUArF-0003FO-ME for submit@debbugs.gnu.org; Sun, 10 Jan 2010 22:22:21 -0500 Received: from Debian-exim by monty-python.gnu.org with spam-scanned (Exim 4.60) (envelope-from ) id 1NUArE-0007MF-D6 for submit@debbugs.gnu.org; Sun, 10 Jan 2010 22:22:21 -0500 X-Spam-Checker-Version: SpamAssassin 3.1.0 (2005-09-13) on monty-python X-Spam-Level: X-Spam-Status: No, score=-2.6 required=5.0 tests=AWL,BAYES_00, UNPARSEABLE_RELAY autolearn=ham version=3.1.0 Received: from lists.gnu.org ([199.232.76.165]:34535) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1NUArE-0007MB-7j for submit@debbugs.gnu.org; Sun, 10 Jan 2010 22:22:20 -0500 Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1NUArD-0006gK-Ll for bug-gnu-emacs@gnu.org; Sun, 10 Jan 2010 22:22:19 -0500 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1NUAr7-0006eD-OH for bug-gnu-emacs@gnu.org; Sun, 10 Jan 2010 22:22:18 -0500 Received: from [199.232.76.173] (port=60162 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1NUAr7-0006eA-GS for bug-gnu-emacs@gnu.org; Sun, 10 Jan 2010 22:22:13 -0500 Received: from mail-yw0-f177.google.com ([209.85.211.177]:48197) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1NUAr7-0007L9-0e for bug-gnu-emacs@gnu.org; Sun, 10 Jan 2010 22:22:13 -0500 Received: by ywh7 with SMTP id 7so13099974ywh.24 for ; Sun, 10 Jan 2010 19:22:09 -0800 (PST) MIME-Version: 1.0 Received: by 10.150.44.24 with SMTP id r24mr4126817ybr.249.1263180129392; Sun, 10 Jan 2010 19:22:09 -0800 (PST) Date: Sun, 10 Jan 2010 22:22:09 -0500 X-Google-Sender-Auth: 6f29ac193fc6484c Message-ID: Subject: Rectangles of type `beer bellied' From: MON KEY To: bug-gnu-emacs@gnu.org Content-Type: text/plain; charset=UTF-8 X-detected-operating-system: by monty-python.gnu.org: GNU/Linux 2.6 (newer, 2) X-detected-operating-system: by monty-python.gnu.org: GNU/Linux 2.6, seldom 2.4 (older, 4) X-Spam-Score: -6.6 (------) X-Debbugs-Envelope-To: submit X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -6.6 (------) This bug report is apropos Emacs bug - #1184 of Thu, 16 Oct 2008 19:45:02 UTC "document how to deal with beer belly rectangles" Bug #1184 is Tagged: wontfix As that bug report log contains one legit message and 44 bogus messages rather than add to the fray I am starting a new bug report. FWIW the following function handles the problem. ;;; ============================== ;;; :BUG #1184 of Thu, 16 Oct 2008 19:45:02 UTC ;;; "document how to deal with beer belly rectangles" ;;; :SEE (URL `http://debbugs.gnu.org/cgi/bugreport.cgi?bug=1184') ;;; :CREATED (defun kill-rectangle-w-beer-belly (belly-start belly-end) "Like kill-rectangle but adds trailing whitespace when column at mark is less than the longest line in rectangle." (interactive "r\n") (let ((max-len 0) (fatter-belly)) (unwind-protect (narrow-to-region belly-start belly-end) (goto-char (point-min)) (while (eq (forward-line) 0) (end-of-line) (when (> (current-column) max-len) (setq max-len (current-column)))) (when (= (current-column) max-len) (setq fatter-belly t) (kill-rectangle belly-start belly-end)) (unless fatter-belly (setq fatter-belly (buffer-substring-no-properties belly-start belly-end)) (goto-char belly-start) (kill-line) (while (eq (forward-line) 0) (kill-line)) (when (stringp fatter-belly) (with-temp-buffer (insert fatter-belly) (goto-char (point-min)) (while (eq (forward-line) 0) (let ((lebp `(,(line-beginning-position) . ,(line-end-position)))) (unless (= (- (car lebp) (cdr lebp)) max-len) (end-of-line) (insert (make-string (- max-len (- (cdr lebp) (car lebp))) 32))))) (kill-rectangle (buffer-end 0) (buffer-end 1))))) (widen)))) /s_P\ From debbugs-submit-bounces@debbugs.gnu.org Wed Jan 13 12:39:30 2010 Received: (at control) by debbugs.gnu.org; 13 Jan 2010 17:39:30 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1NV7Bq-0005Bi-2S for submit@debbugs.gnu.org; Wed, 13 Jan 2010 12:39:30 -0500 Received: from fencepost.gnu.org ([140.186.70.10]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1NV7Bn-0005Bb-KB for control@debbugs.gnu.org; Wed, 13 Jan 2010 12:39:27 -0500 Received: from rgm by fencepost.gnu.org with local (Exim 4.69) (envelope-from ) id 1NV7Bi-00008A-3m; Wed, 13 Jan 2010 12:39:22 -0500 MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Message-ID: <19278.1354.66161.232229@fencepost.gnu.org> Date: Wed, 13 Jan 2010 12:39:22 -0500 From: Glenn Morris To: control Subject: control X-Attribution: GM X-Mailer: VM (www.wonderworks.com/vm), GNU Emacs (www.gnu.org/software/emacs) X-Hue: green X-Ran: Br14aVx1s"b%XZBACFejP="95+225[b<2X;?d6*Zi5tg3`Ay]KueFAKm`1I_ List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -3.4 (---) reassign 1184 emacs forcemerge 1184 5351 reassign 5367 emacs,gnus severity 5366 wishlist severity 5325 minor From debbugs-submit-bounces@debbugs.gnu.org Sun Jul 10 08:50:10 2011 Received: (at control) by debbugs.gnu.org; 10 Jul 2011 12:50:11 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1QftSc-0001Od-FL for submit@debbugs.gnu.org; Sun, 10 Jul 2011 08:50:10 -0400 Received: from hermes.netfonds.no ([80.91.224.195]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1QftSa-0001OH-4k for control@debbugs.gnu.org; Sun, 10 Jul 2011 08:50:08 -0400 Received: from cm-84.215.51.58.getinternet.no ([84.215.51.58] helo=quimbies.gnus.org) by hermes.netfonds.no with esmtpsa (TLS1.0:DHE_RSA_AES_128_CBC_SHA1:16) (Exim 4.72) (envelope-from ) id 1QftSO-0008JO-T0 for control@debbugs.gnu.org; Sun, 10 Jul 2011 14:49:56 +0200 Date: Sun, 10 Jul 2011 14:49:56 +0200 Message-Id: To: control@debbugs.gnu.org From: Lars Magne Ingebrigtsen Subject: control message for bug #1184 X-MailScanner-ID: 1QftSO-0008JO-T0 X-Netfonds-MailScanner: Found to be clean X-Netfonds-MailScanner-From: larsi@gnus.org MailScanner-NULL-Check: 1310906996.96438@5NjIO+vqIbWVxKKq2NXxCg X-Spam-Status: No X-Spam-Score: -2.7 (--) X-Debbugs-Envelope-To: control X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -2.7 (--) close 1184 From unknown Sun Aug 10 08:59:32 2025 Received: (at fakecontrol) by fakecontrolmessage; To: internal_control@debbugs.gnu.org From: Debbugs Internal Request Subject: Internal Control Message-Id: bug archived. Date: Mon, 08 Aug 2011 11:24:06 +0000 User-Agent: Fakemail v42.6.9 # This is a fake control message. # # The action: # bug archived. thanks # This fakemail brought to you by your local debbugs # administrator