From debbugs-submit-bounces@debbugs.gnu.org Sun Nov 28 05:22:42 2010 Received: (at submit) by debbugs.gnu.org; 28 Nov 2010 10:22:42 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMeP2-0000oR-Ve for submit@debbugs.gnu.org; Sun, 28 Nov 2010 05:22:41 -0500 Received: from eggs.gnu.org ([140.186.70.92]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMeP1-0000oG-8B for submit@debbugs.gnu.org; Sun, 28 Nov 2010 05:22:40 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1PMeUL-00059g-Bj for submit@debbugs.gnu.org; Sun, 28 Nov 2010 05:28:10 -0500 X-Spam-Checker-Version: SpamAssassin 3.3.1 (2010-03-16) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=unavailable version=3.3.1 Received: from lists.gnu.org ([199.232.76.165]:53846) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1PMeUL-00059a-0P for submit@debbugs.gnu.org; Sun, 28 Nov 2010 05:28:09 -0500 Received: from [140.186.70.92] (port=37537 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1PMeUK-0000o6-2u for bug-gnu-emacs@gnu.org; Sun, 28 Nov 2010 05:28:08 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1PMeUJ-00059Q-4K for bug-gnu-emacs@gnu.org; Sun, 28 Nov 2010 05:28:07 -0500 Received: from fitch7.uni2.net ([92.43.122.90]:41214) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1PMeUI-00058t-VL for bug-gnu-emacs@gnu.org; Sun, 28 Nov 2010 05:28:07 -0500 Received: from [10.0.10.34] (unknown [130.227.120.134]) by fitch7.uni2.net (Postfix) with ESMTP id 8240F2A18022 for ; Sun, 28 Nov 2010 11:27:59 +0100 (CET) Message-ID: <4CF22EA9.3020207@inducks.org> Date: Sun, 28 Nov 2010 11:27:53 +0100 From: Mads Jensen User-Agent: Thunderbird 2.0.0.24 (X11/20101027) MIME-Version: 1.0 To: bug-gnu-emacs@gnu.org Subject: copy-and-insert-previous-line X-Enigmail-Version: 0.95.7 OpenPGP: id=7E775BDA Content-Type: multipart/signed; micalg=pgp-sha1; protocol="application/pgp-signature"; boundary="------------enigD654E7AE30E99F96401FFA4C" X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.4-2.6 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) 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 is an OpenPGP/MIME signed message (RFC 2440 and 3156) --------------enigD654E7AE30E99F96401FFA4C Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable I couldn't find a similar macro which did the same trick, so I wrote one myself: (defun copy-and-insert-previous-line () (interactive) (save-excursion (goto-line (1- (line-number-at-pos))) (copy-current-line)) (yank)) It's quite useful for much of the typing I do. --=20 Med Venlig Hilsen / Kind Regards, Mads Jensen Rubinsteinsvej 31,st.th DK-2450 Kbh. SV Denmark --------------enigD654E7AE30E99F96401FFA4C Content-Type: application/pgp-signature; name="signature.asc" Content-Description: OpenPGP digital signature Content-Disposition: attachment; filename="signature.asc" -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.9 (GNU/Linux) Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org iEYEARECAAYFAkzyLqwACgkQPOK1Nn53W9qOHACeL0SLeq+zJ5auTlYPrBIt/6fM r9wAn2tusd1fuRnk4m5zHHsYHzk2vcGP =xDrr -----END PGP SIGNATURE----- --------------enigD654E7AE30E99F96401FFA4C-- From debbugs-submit-bounces@debbugs.gnu.org Sun Nov 28 06:05:00 2010 Received: (at 7503) by debbugs.gnu.org; 28 Nov 2010 11:05:00 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMf3z-0001iK-67 for submit@debbugs.gnu.org; Sun, 28 Nov 2010 06:04:59 -0500 Received: from mail-out.m-online.net ([212.18.0.9]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMf3w-0001i6-Tx for 7503@debbugs.gnu.org; Sun, 28 Nov 2010 06:04:57 -0500 Received: from frontend1.mail.m-online.net (unknown [192.168.8.180]) by mail-out.m-online.net (Postfix) with ESMTP id 161181C08CFC; Sun, 28 Nov 2010 12:10:27 +0100 (CET) X-Auth-Info: MSnDLdy6+9jmkRug6htLfh1/K4xh1KeU462/+VoNmzA= Received: from linux.local (ppp-88-217-110-40.dynamic.mnet-online.de [88.217.110.40]) by mail.mnet-online.de (Postfix) with ESMTPA id 009E31C00453; Sun, 28 Nov 2010 12:10:26 +0100 (CET) Received: by linux.local (Postfix, from userid 501) id 365A31E52F8; Sun, 28 Nov 2010 12:10:25 +0100 (CET) From: Andreas Schwab To: Mads Jensen Subject: Re: bug#7503: copy-and-insert-previous-line References: <4CF22EA9.3020207@inducks.org> X-Yow: Either CONFESS now or we go to ``PEOPLE'S COURT''!! Date: Sun, 28 Nov 2010 12:10:25 +0100 In-Reply-To: <4CF22EA9.3020207@inducks.org> (Mads Jensen's message of "Sun, 28 Nov 2010 11:27:53 +0100") Message-ID: User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.2.90 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Spam-Score: -2.7 (--) X-Debbugs-Envelope-To: 7503 Cc: 7503@debbugs.gnu.org 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 (--) Mads Jensen writes: > I couldn't find a similar macro which did the same trick, so I wrote one > myself: > > (defun copy-and-insert-previous-line () > (interactive) > (save-excursion > (goto-line (1- (line-number-at-pos))) (forward-line -1) > (copy-current-line)) This function is not defined. > (yank)) (defun duplicate-previous-line () (interactive "*") (save-excursion (insert (buffer-substring (progn (forward-line -1) (point)) (progn (forward-line 1) (point)))))) Andreas. -- Andreas Schwab, schwab@linux-m68k.org GPG Key fingerprint = 58CA 54C7 6D53 942B 1756 01D3 44D5 214B 8276 4ED5 "And now for something completely different." From debbugs-submit-bounces@debbugs.gnu.org Sun Nov 28 07:51:19 2010 Received: (at submit) by debbugs.gnu.org; 28 Nov 2010 12:51:19 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMgis-0004yb-G8 for submit@debbugs.gnu.org; Sun, 28 Nov 2010 07:51:18 -0500 Received: from eggs.gnu.org ([140.186.70.92]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMgiq-0004yN-6E for submit@debbugs.gnu.org; Sun, 28 Nov 2010 07:51:17 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1PMgoA-0002uA-JH for submit@debbugs.gnu.org; Sun, 28 Nov 2010 07:56:47 -0500 X-Spam-Checker-Version: SpamAssassin 3.3.1 (2010-03-16) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM, T_RP_MATCHES_RCVD, T_TO_NO_BRKTS_FREEMAIL autolearn=unavailable version=3.3.1 Received: from lists.gnu.org ([199.232.76.165]:49030) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1PMgoA-0002u6-H3 for submit@debbugs.gnu.org; Sun, 28 Nov 2010 07:56:46 -0500 Received: from [140.186.70.92] (port=33144 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1PMgo9-00053s-3i for bug-gnu-emacs@gnu.org; Sun, 28 Nov 2010 07:56:46 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1PMgo7-0002tP-KB for bug-gnu-emacs@gnu.org; Sun, 28 Nov 2010 07:56:44 -0500 Received: from lo.gmane.org ([80.91.229.12]:60197) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1PMgo7-0002sr-El for bug-gnu-emacs@gnu.org; Sun, 28 Nov 2010 07:56:43 -0500 Received: from list by lo.gmane.org with local (Exim 4.69) (envelope-from ) id 1PMgo2-0000bT-AU for bug-gnu-emacs@gnu.org; Sun, 28 Nov 2010 13:56:38 +0100 Received: from cpc1-cmbg13-0-0-cust596.5-4.cable.virginmedia.com ([86.9.122.85]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Sun, 28 Nov 2010 13:56:38 +0100 Received: from sdl.web by cpc1-cmbg13-0-0-cust596.5-4.cable.virginmedia.com with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Sun, 28 Nov 2010 13:56:38 +0100 X-Injected-Via-Gmane: http://gmane.org/ To: bug-gnu-emacs@gnu.org From: Leo Subject: Re: bug#7503: copy-and-insert-previous-line Date: Sun, 28 Nov 2010 12:56:26 +0000 Lines: 26 Message-ID: References: <4CF22EA9.3020207@inducks.org> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Complaints-To: usenet@dough.gmane.org X-Gmane-NNTP-Posting-Host: cpc1-cmbg13-0-0-cust596.5-4.cable.virginmedia.com Face: iVBORw0KGgoAAAANSUhEUgAAACgAAAAoBAMAAAB+0KVeAAAAMFBMVEUaFRZLMy1dTENxVzKQ WiCrXQ97cmO/dSqSh3akjGTApXy5sJ7Sxo/Sz8Xo6eP9//xJbkruAAAAAWJLR0QAiAUdSAAAAAlw SFlzAAACxQAAAsUBidZ/7wAAAAd0SU1FB9cBBwMJOwHXewoAAAIBSURBVCjPVdNBiNNAFADQ6J4F x3hThHZBBC+WCFI8SS0iezRDcMHLHkLAg6gJH/fgYQ9xYlj2sLK4KHgqCgXFhda2Idmr4kkQPZQ0 nkQMbTypbMmMM2m7ZgYSmMef/5OZPwo7HFnx3uKPcmj0Dht1LWZJ+Hvr7dIFZXRUwl9VRTuuKDJ+ U44gjscknK4hhJaCkYRsWjmBtLqXlJAG2wipNe18OZJu1BBq1E8xafl4s6Jq2mUZGftU1y7CCxnp FVUDWJXx4C66BKBnErbuoaYNtoRTu6EZBsCbMn7W+5qOAR6WvxNOby9jHWC9hAf3n304CdiAByXs 3Nh9roLDkyb/sWV712vYwaLSAn8CPMHIAAzOPDKP2COAFm4Y4ODVWc6xG7KXsN7UeUJjjimx2uwd gCgNhr0i8C/xyCD5CiCKAMY3Bf5oDzx//w/fimscdcAZU2jv9sedx6+nYPPFIoWI/GK6QZ+EFGOR ErAjCnV3vPZ7XqlTIMbOLY7fLcvvmT7rXNWaGDexIY44N12TG2PDp7vqyl57dnCeuWwyNpnEURxk fTbDYeBnKRn4oejPYI4sH6WviBumEZ/GxX4X/x6EcURFZ7E071bjQGAxpcOAEOJuTiroDEea5Szv rVWLYfl7ZiQwSUToxrkux7OLixAWGz22+HIyWTRYcVfomOwvzusfjtVIGgLHf3MAAAAASUVORK5C YII= User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.2 (Mac OS X 10.6.5) Cancel-Lock: sha1:ot9RQyXfehS0UCn2GGzUmfJmsD0= X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 3) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-Spam-Score: -5.9 (-----) 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: -5.9 (-----) On 2010-11-28 11:10 +0000, Andreas Schwab wrote: > (defun duplicate-previous-line () > (interactive "*") > (save-excursion > (insert > (buffer-substring (progn (forward-line -1) (point)) > (progn (forward-line 1) (point)))))) There's also this: ,----[ C-h f copy-from-above-command RET ] | copy-from-above-command is an interactive autoloaded Lisp function in | `misc.el'. | | [Arg list not available until function definition is loaded.] | | Not documented. | | [back] `---- Leo -- Any Emacs contains an ad hoc, informally-specified, bug-ridden, slow implementation of half of Common Lisp. From debbugs-submit-bounces@debbugs.gnu.org Sun Nov 28 08:32:03 2010 Received: (at 7503) by debbugs.gnu.org; 28 Nov 2010 13:32:03 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMhMI-0005sk-GS for submit@debbugs.gnu.org; Sun, 28 Nov 2010 08:32:03 -0500 Received: from fencepost.gnu.org ([140.186.70.10]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMhMG-0005sC-Op for 7503@debbugs.gnu.org; Sun, 28 Nov 2010 08:32:01 -0500 Received: from eliz by fencepost.gnu.org with local (Exim 4.69) (envelope-from ) id 1PMhRZ-0002kB-88; Sun, 28 Nov 2010 08:37:29 -0500 From: Eli Zaretskii To: Andreas Schwab In-reply-to: (message from Andreas Schwab on Sun, 28 Nov 2010 12:10:25 +0100) Subject: Re: bug#7503: copy-and-insert-previous-line References: <4CF22EA9.3020207@inducks.org> Message-Id: Date: Sun, 28 Nov 2010 08:37:29 -0500 X-Spam-Score: -6.5 (------) X-Debbugs-Envelope-To: 7503 Cc: mje@inducks.org, 7503@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list Reply-To: Eli Zaretskii 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.5 (------) > From: Andreas Schwab > Date: Sun, 28 Nov 2010 12:10:25 +0100 > Cc: 7503@debbugs.gnu.org > > (buffer-substring (progn (forward-line -1) (point)) > (progn (forward-line 1) (point)))))) What's wrong with line-beginning-position and line-end-position? From debbugs-submit-bounces@debbugs.gnu.org Sun Nov 28 09:07:35 2010 Received: (at 7503) by debbugs.gnu.org; 28 Nov 2010 14:07:35 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMhuh-0006hA-11 for submit@debbugs.gnu.org; Sun, 28 Nov 2010 09:07:35 -0500 Received: from mailout-de.gmx.net ([213.165.64.23] helo=mail.gmx.net) by debbugs.gnu.org with smtp (Exim 4.69) (envelope-from ) id 1PMhue-0006gy-Bf for 7503@debbugs.gnu.org; Sun, 28 Nov 2010 09:07:32 -0500 Received: (qmail invoked by alias); 28 Nov 2010 14:13:02 -0000 Received: from 62-47-46-250.adsl.highway.telekom.at (EHLO [62.47.46.250]) [62.47.46.250] by mail.gmx.net (mp021) with SMTP; 28 Nov 2010 15:13:02 +0100 X-Authenticated: #14592706 X-Provags-ID: V01U2FsdGVkX18fzEoppTwfnOoxcl5LKL8+nCVW92+2DNb2RpP6vK Sa2Sq+XY7VqbqB Message-ID: <4CF2636C.6030105@gmx.at> Date: Sun, 28 Nov 2010 15:13:00 +0100 From: martin rudalics User-Agent: Thunderbird 2.0.0.21 (Windows/20090302) MIME-Version: 1.0 To: Eli Zaretskii Subject: Re: bug#7503: copy-and-insert-previous-line References: <4CF22EA9.3020207@inducks.org> In-Reply-To: Content-Type: text/plain; charset=ISO-8859-15; format=flowed Content-Transfer-Encoding: 7bit X-Y-GMX-Trusted: 0 X-Spam-Score: -1.4 (-) X-Debbugs-Envelope-To: 7503 Cc: mje@inducks.org, Andreas Schwab , 7503@debbugs.gnu.org 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: -1.4 (-) > What's wrong with line-beginning-position and line-end-position? Field boundaries? martin From debbugs-submit-bounces@debbugs.gnu.org Sun Nov 28 09:23:05 2010 Received: (at 7503) by debbugs.gnu.org; 28 Nov 2010 14:23:05 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMi9g-00073K-Cb for submit@debbugs.gnu.org; Sun, 28 Nov 2010 09:23:04 -0500 Received: from fencepost.gnu.org ([140.186.70.10]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMi9e-00072s-Lv for 7503@debbugs.gnu.org; Sun, 28 Nov 2010 09:23:03 -0500 Received: from eliz by fencepost.gnu.org with local (Exim 4.69) (envelope-from ) id 1PMiEw-0005P8-3N; Sun, 28 Nov 2010 09:28:30 -0500 From: Eli Zaretskii To: martin rudalics In-reply-to: <4CF2636C.6030105@gmx.at> (message from martin rudalics on Sun, 28 Nov 2010 15:13:00 +0100) Subject: Re: bug#7503: copy-and-insert-previous-line References: <4CF22EA9.3020207@inducks.org> <4CF2636C.6030105@gmx.at> Message-Id: Date: Sun, 28 Nov 2010 09:28:30 -0500 X-Spam-Score: -6.5 (------) X-Debbugs-Envelope-To: 7503 Cc: mje@inducks.org, schwab@linux-m68k.org, 7503@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list Reply-To: Eli Zaretskii 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.5 (------) > Date: Sun, 28 Nov 2010 15:13:00 +0100 > From: martin rudalics > CC: Andreas Schwab , mje@inducks.org, > 7503@debbugs.gnu.org > > > What's wrong with line-beginning-position and line-end-position? > > Field boundaries? "To ignore field boundaries bind `inhibit-field-text-motion' to t." From debbugs-submit-bounces@debbugs.gnu.org Sun Nov 28 09:27:07 2010 Received: (at 7503) by debbugs.gnu.org; 28 Nov 2010 14:27:08 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMiDa-00078n-RA for submit@debbugs.gnu.org; Sun, 28 Nov 2010 09:27:07 -0500 Received: from fitch7.uni2.net ([92.43.122.90]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMiDX-00078H-NN for 7503@debbugs.gnu.org; Sun, 28 Nov 2010 09:27:04 -0500 Received: from [10.0.10.34] (unknown [130.227.120.134]) by fitch7.uni2.net (Postfix) with ESMTP id 6EEFA2A17A3E; Sun, 28 Nov 2010 15:32:36 +0100 (CET) Message-ID: <4CF26801.9060901@inducks.org> Date: Sun, 28 Nov 2010 15:32:33 +0100 From: Mads Jensen User-Agent: Thunderbird 2.0.0.24 (X11/20101027) MIME-Version: 1.0 To: Andreas Schwab , 7503@debbugs.gnu.org Subject: Re: bug#7503: copy-and-insert-previous-line References: <4CF22EA9.3020207@inducks.org> In-Reply-To: X-Enigmail-Version: 0.95.7 OpenPGP: id=7E775BDA Content-Type: multipart/signed; micalg=pgp-sha1; protocol="application/pgp-signature"; boundary="------------enig26068A3794E16B3CC41EBAFC" X-Spam-Score: -4.6 (----) X-Debbugs-Envelope-To: 7503 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: -3.9 (---) This is an OpenPGP/MIME signed message (RFC 2440 and 3156) --------------enig26068A3794E16B3CC41EBAFC Content-Type: multipart/mixed; boundary="------------040007000209070103090806" This is a multi-part message in MIME format. --------------040007000209070103090806 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable Andreas Schwab wrote: >> (defun copy-and-insert-previous-line () >> (interactive) >> (save-excursion >> (goto-line (1- (line-number-at-pos))) > (forward-line -1) >=20 >> (copy-current-line)) >=20 > This function is not defined. Sorry for not remembering to attach this one, too. (defun copy-current-line () (interactive) (kill-ring-save (point-at-bol) (point-at-eol))) >> (yank)) >=20 > (defun duplicate-previous-line () > (interactive "*") > (save-excursion > (insert > (buffer-substring (progn (forward-line -1) (point)) > (progn (forward-line 1) (point)))))) There is a difference between my version, and this one, as mine doesn't add the newline-character from the end of the previous line. I'm using Emacs 22.2.1 as Emacs 23 is not the default in Ubuntu 9.10. Thanks for the quick response :-) --=20 Med Venlig Hilsen / Kind Regards, Mads Jensen Rubinsteinsvej 31,st.th DK-2450 Kbh. SV Denmark --------------040007000209070103090806 Content-Type: application/pgp-signature; name="signature.asc" Content-Transfer-Encoding: base64 Content-Disposition: inline; filename="signature.asc" LS0tLS1CRUdJTiBQR1AgU0lHTkFUVVJFLS0tLS0KVmVyc2lvbjogR251UEcgdjEuNC45IChH TlUvTGludXgpCkNvbW1lbnQ6IFVzaW5nIEdudVBHIHdpdGggTW96aWxsYSAtIGh0dHA6Ly9l bmlnbWFpbC5tb3pkZXYub3JnCgppRVlFQVJFQ0FBWUZBa3p5WjdRQUNna1FQT0sxTm41M1c5 cUR2QUNlSXJBSTlkRXZ3Slpwc0NOY2orVk5PSlZ2CnpDY0FuM1hKUnZkSmxEQVZGSkFudm9X azFRdUZrVURYCj1ROUZTCi0tLS0tRU5EIFBHUCBTSUdOQVRVUkUtLS0tLQoK --------------040007000209070103090806-- --------------enig26068A3794E16B3CC41EBAFC Content-Type: application/pgp-signature; name="signature.asc" Content-Description: OpenPGP digital signature Content-Disposition: attachment; filename="signature.asc" -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.9 (GNU/Linux) Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org iEYEARECAAYFAkzyaAEACgkQPOK1Nn53W9rg9gCfYvb42P+71gWuUHmLNDCUP9EY UT4AoIbLOSOz76FHe8MpXwiQ8JlfGyiz =il7J -----END PGP SIGNATURE----- --------------enig26068A3794E16B3CC41EBAFC-- From debbugs-submit-bounces@debbugs.gnu.org Sun Nov 28 09:59:10 2010 Received: (at 7503) by debbugs.gnu.org; 28 Nov 2010 14:59:10 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMiic-00081d-EG for submit@debbugs.gnu.org; Sun, 28 Nov 2010 09:59:10 -0500 Received: from mailout-de.gmx.net ([213.165.64.23] helo=mail.gmx.net) by debbugs.gnu.org with smtp (Exim 4.69) (envelope-from ) id 1PMiiZ-00081Q-Eb for 7503@debbugs.gnu.org; Sun, 28 Nov 2010 09:59:08 -0500 Received: (qmail invoked by alias); 28 Nov 2010 15:04:37 -0000 Received: from 62-47-46-250.adsl.highway.telekom.at (EHLO [62.47.46.250]) [62.47.46.250] by mail.gmx.net (mp039) with SMTP; 28 Nov 2010 16:04:37 +0100 X-Authenticated: #14592706 X-Provags-ID: V01U2FsdGVkX19DLCpx6KxDDP3IvioWo+2Fc2NJCtebwFTqKFIOjO CqkasumP/WU7Ds Message-ID: <4CF26F7D.5020705@gmx.at> Date: Sun, 28 Nov 2010 16:04:29 +0100 From: martin rudalics User-Agent: Thunderbird 2.0.0.21 (Windows/20090302) MIME-Version: 1.0 To: Eli Zaretskii Subject: Re: bug#7503: copy-and-insert-previous-line References: <4CF22EA9.3020207@inducks.org> <4CF2636C.6030105@gmx.at> In-Reply-To: Content-Type: text/plain; charset=ISO-8859-15; format=flowed Content-Transfer-Encoding: 7bit X-Y-GMX-Trusted: 0 X-Spam-Score: -2.5 (--) X-Debbugs-Envelope-To: 7503 Cc: mje@inducks.org, schwab@linux-m68k.org, 7503@debbugs.gnu.org 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.5 (--) >>> What's wrong with line-beginning-position and line-end-position? >> Field boundaries? > > "To ignore field boundaries bind `inhibit-field-text-motion' to t." Sure. But why bother? `line-beginning-position' does `forward-line' internally anyway. martin From debbugs-submit-bounces@debbugs.gnu.org Sun Nov 28 10:39:31 2010 Received: (at 7503) by debbugs.gnu.org; 28 Nov 2010 15:39:31 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMjLf-0000a2-LH for submit@debbugs.gnu.org; Sun, 28 Nov 2010 10:39:31 -0500 Received: from fencepost.gnu.org ([140.186.70.10]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMjLd-0000Zq-HD for 7503@debbugs.gnu.org; Sun, 28 Nov 2010 10:39:29 -0500 Received: from eliz by fencepost.gnu.org with local (Exim 4.69) (envelope-from ) id 1PMjQv-0000mu-UZ; Sun, 28 Nov 2010 10:44:57 -0500 From: Eli Zaretskii To: martin rudalics In-reply-to: <4CF26F7D.5020705@gmx.at> (message from martin rudalics on Sun, 28 Nov 2010 16:04:29 +0100) Subject: Re: bug#7503: copy-and-insert-previous-line References: <4CF22EA9.3020207@inducks.org> <4CF2636C.6030105@gmx.at> <4CF26F7D.5020705@gmx.at> Message-Id: Date: Sun, 28 Nov 2010 10:44:57 -0500 X-Spam-Score: -6.5 (------) X-Debbugs-Envelope-To: 7503 Cc: mje@inducks.org, schwab@linux-m68k.org, 7503@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list Reply-To: Eli Zaretskii 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.5 (------) > Date: Sun, 28 Nov 2010 16:04:29 +0100 > From: martin rudalics > CC: schwab@linux-m68k.org, mje@inducks.org, 7503@debbugs.gnu.org > > >>> What's wrong with line-beginning-position and line-end-position? > >> Field boundaries? > > > > "To ignore field boundaries bind `inhibit-field-text-motion' to t." > > Sure. But why bother? Because it's a useful level of abstraction? From debbugs-submit-bounces@debbugs.gnu.org Sun Nov 28 11:05:36 2010 Received: (at 7503) by debbugs.gnu.org; 28 Nov 2010 16:05:36 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMjku-00018n-Jy for submit@debbugs.gnu.org; Sun, 28 Nov 2010 11:05:36 -0500 Received: from mailout-de.gmx.net ([213.165.64.23] helo=mail.gmx.net) by debbugs.gnu.org with smtp (Exim 4.69) (envelope-from ) id 1PMjks-00018a-5I for 7503@debbugs.gnu.org; Sun, 28 Nov 2010 11:05:35 -0500 Received: (qmail invoked by alias); 28 Nov 2010 16:11:04 -0000 Received: from 62-47-44-248.adsl.highway.telekom.at (EHLO [62.47.44.248]) [62.47.44.248] by mail.gmx.net (mp059) with SMTP; 28 Nov 2010 17:11:04 +0100 X-Authenticated: #14592706 X-Provags-ID: V01U2FsdGVkX1+F2pMo16OFMj8QG3dYHmW3uXYQmuP6Avqehp7/eA GF4IAj4V7TZDJw Message-ID: <4CF27F14.1040400@gmx.at> Date: Sun, 28 Nov 2010 17:11:00 +0100 From: martin rudalics User-Agent: Thunderbird 2.0.0.21 (Windows/20090302) MIME-Version: 1.0 To: Eli Zaretskii Subject: Re: bug#7503: copy-and-insert-previous-line References: <4CF22EA9.3020207@inducks.org> <4CF2636C.6030105@gmx.at> <4CF26F7D.5020705@gmx.at> In-Reply-To: Content-Type: text/plain; charset=ISO-8859-15; format=flowed Content-Transfer-Encoding: 7bit X-Y-GMX-Trusted: 0 X-Spam-Score: -2.5 (--) X-Debbugs-Envelope-To: 7503 Cc: mje@inducks.org, schwab@linux-m68k.org, 7503@debbugs.gnu.org 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.5 (--) > Because it's a useful level of abstraction? Should be. Unfortunately dwarfed by the field motion constraints :-( It takes me more time to understand something like This function constrains the returned position to the current field unless that would be on a different line than the original, unconstrained result. If N is nil or 1, and a rear-sticky field ends at point, the scan stops as soon as it starts. than to code `forward-line' within a `save-excursion'. YMMV. martin From debbugs-submit-bounces@debbugs.gnu.org Sun Nov 28 13:52:25 2010 Received: (at 7503) by debbugs.gnu.org; 28 Nov 2010 18:52:26 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMmML-0004mu-Cv for submit@debbugs.gnu.org; Sun, 28 Nov 2010 13:52:25 -0500 Received: from pruche.dit.umontreal.ca ([132.204.246.22]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMmMJ-0004mh-Q7 for 7503@debbugs.gnu.org; Sun, 28 Nov 2010 13:52:24 -0500 Received: from pastel.home (lechon.iro.umontreal.ca [132.204.27.242]) by pruche.dit.umontreal.ca (8.14.1/8.14.1) with ESMTP id oASIvpZ5028687; Sun, 28 Nov 2010 13:57:52 -0500 Received: by pastel.home (Postfix, from userid 20848) id 2E286A85F1; Sun, 28 Nov 2010 13:57:51 -0500 (EST) From: Stefan Monnier To: Mads Jensen Subject: Re: bug#7503: copy-and-insert-previous-line Message-ID: References: <4CF22EA9.3020207@inducks.org> <4CF26801.9060901@inducks.org> Date: Sun, 28 Nov 2010 13:57:51 -0500 In-Reply-To: <4CF26801.9060901@inducks.org> (Mads Jensen's message of "Sun, 28 Nov 2010 15:32:33 +0100") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.50 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-NAI-Spam-Score: 0 X-NAI-Spam-Rules: 1 Rules triggered RV3693=0 X-Spam-Score: -1.9 (-) X-Debbugs-Envelope-To: 7503 Cc: Andreas Schwab , 7503@debbugs.gnu.org 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: -1.9 (-) > There is a difference between my version, and this one, as mine doesn't > add the newline-character from the end of the previous line. I think such differences is the reason why such commands are not very good candidates for inclusion in Emacs: there are so many different commands that do something along these lines, that adding them all would not make much sense. Luckily, we do have two generic solutions for it: - you can define it in Elisp as you've done. - you can define it as a macro. Stefan From debbugs-submit-bounces@debbugs.gnu.org Sun Nov 28 16:00:05 2010 Received: (at 7503) by debbugs.gnu.org; 28 Nov 2010 21:00:05 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMoLt-0007iP-81 for submit@debbugs.gnu.org; Sun, 28 Nov 2010 16:00:05 -0500 Received: from mail-wy0-f172.google.com ([74.125.82.172]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PMoLr-0007hd-IK for 7503@debbugs.gnu.org; Sun, 28 Nov 2010 16:00:04 -0500 Received: by wyf23 with SMTP id 23so2864478wyf.3 for <7503@debbugs.gnu.org>; Sun, 28 Nov 2010 13:05:35 -0800 (PST) MIME-Version: 1.0 Received: by 10.216.172.149 with SMTP id t21mr2394802wel.43.1290978334875; Sun, 28 Nov 2010 13:05:34 -0800 (PST) Received: by 10.216.70.212 with HTTP; Sun, 28 Nov 2010 13:05:34 -0800 (PST) Date: Sun, 28 Nov 2010 16:05:34 -0500 X-Google-Sender-Auth: m42tUrvKlNlNALa9DnOkXSpnZpk Message-ID: Subject: Re: bug#7503: copy-and-insert-previous-line From: MON KEY To: 7503@debbugs.gnu.org Content-Type: text/plain; charset=UTF-8 X-Spam-Score: -3.2 (---) X-Debbugs-Envelope-To: 7503 Cc: mje@inducks.org, rudalics@gmx.at, schwab@linux-m68k.org, monnier@iro.umontreal.ca, eliz@gnu.org, sdl.web@gmail.com 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: -3.2 (---) I think such differences is the reason why such commands are not very good candidates for inclusion in Emacs: there are so many different commands that do something along these lines, that adding them all would not make much sense. FWIW following is my more generalized take on Andreas' and Mads' versions. This one: - Doesn't step on the kill-ring; - Has option to keep/omit text-props; - inserts only when asked to do so: ;;; (defun line-previous-duplicate (&optional keep-props insrtp intrp) "Return content of previous line. When optional arg KEEP-PROPS is non-nil return value is as if by `buffer-substring'. Default is as if by `buffer-substring-no-properties'. When optional arg INSRTP is non-nil or called-interactively, insert return value at point. Does not move point." (interactive "*i\ni\np") (save-excursion (let ((lpd-psns `(,(progn (forward-line -1) (point)) . ,(progn (forward-line 1) (point))))) (set (or (and intrp (quote intrp)) (and insrtp (quote insrtp)) (and (set (quote intrp) (quote insrtp)) (quote insrtp))) (or (and keep-props (buffer-substring (car lpd-psns) (cdr lpd-psns))) (buffer-substring-no-properties (car lpd-psns) (cdr lpd-psns))))) (or (and (not (eq intrp 'insrtp)) (stringp insrtp) (insert insrtp)) (and intrp (stringp intrp) (insert intrp)) insrtp))) -- /s_P\ From debbugs-submit-bounces@debbugs.gnu.org Mon Mar 05 16:21:55 2012 Received: (at control) by debbugs.gnu.org; 5 Mar 2012 21:21:55 +0000 Received: from localhost ([127.0.0.1]:34725 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1S4fLu-0005Ns-N8 for submit@debbugs.gnu.org; Mon, 05 Mar 2012 16:21:55 -0500 Received: from fencepost.gnu.org ([208.118.235.10]:44747) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1S4fLj-0005NV-7p for control@debbugs.gnu.org; Mon, 05 Mar 2012 16:21:43 -0500 Received: from rgm by fencepost.gnu.org with local (Exim 4.71) (envelope-from ) id 1S4fKv-0007f8-9j for control@debbugs.gnu.org; Mon, 05 Mar 2012 16:20:53 -0500 Date: Mon, 05 Mar 2012 16:20:53 -0500 Message-Id: Subject: control message for bug 7503 To: X-Mailer: mail (GNU Mailutils 2.1) From: Glenn Morris X-Spam-Score: -6.9 (------) X-Debbugs-Envelope-To: control X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 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.9 (------) tag 7503 wontfix From debbugs-submit-bounces@debbugs.gnu.org Sat Feb 01 02:27:00 2014 Received: (at control) by debbugs.gnu.org; 1 Feb 2014 07:27:00 +0000 Received: from localhost ([127.0.0.1]:43737 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1W9Uyh-0002I6-HD for submit@debbugs.gnu.org; Sat, 01 Feb 2014 02:26:59 -0500 Received: from hermes.netfonds.no ([80.91.224.195]:46441) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1W9Uyd-0002Hx-Um for control@debbugs.gnu.org; Sat, 01 Feb 2014 02:26:56 -0500 Received: from [204.14.154.233] (helo=building.gnus.org) by hermes.netfonds.no with esmtpsa (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.72) (envelope-from ) id 1W9UyO-00020P-Py for control@debbugs.gnu.org; Sat, 01 Feb 2014 08:26:41 +0100 Date: Fri, 31 Jan 2014 23:25:49 -0800 Message-Id: <87k3dfpa4i.fsf@building.gnus.org> To: control@debbugs.gnu.org From: Lars Ingebrigtsen Subject: control message for bug #7503 X-MailScanner-ID: 1W9UyO-00020P-Py X-Netfonds-MailScanner: Found to be clean X-Netfonds-MailScanner-From: larsi@gnus.org MailScanner-NULL-Check: 1391844403.05521@0fg+ppqW+SUBBsw7Slz5SQ X-Spam-Status: No X-Spam-Score: 0.0 (/) X-Debbugs-Envelope-To: control X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: 0.0 (/) close 7503 From unknown Thu Jun 19 14:12:47 2025 Received: (at fakecontrol) by fakecontrolmessage; To: internal_control@debbugs.gnu.org From: Debbugs Internal Request Subject: Internal Control Message-Id: bug archived. Date: Sat, 01 Mar 2014 12:24:03 +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