From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Emanuel Berg Newsgroups: gmane.emacs.help Subject: Re: [External] : interactive to do `use-region-p' Date: Mon, 07 Nov 2022 18:25:56 +0100 Message-ID: <87iljqoevv.fsf@dataswamp.org> References: <87o7tkci2t.fsf@dataswamp.org> <87mt93q78i.fsf@dataswamp.org> Mime-Version: 1.0 Content-Type: text/plain Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="31723"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Gnus/5.13 (Gnus v5.13) To: help-gnu-emacs@gnu.org Cancel-Lock: sha1:LmJbIaQjb5Ui1jZuguru5dAQlVY= Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane-mx.org@gnu.org Tue Nov 08 11:52:46 2022 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1osMDm-000809-Ae for geh-help-gnu-emacs@m.gmane-mx.org; Tue, 08 Nov 2022 11:52:46 +0100 Original-Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1osMDf-00071v-Hz; Tue, 08 Nov 2022 05:52:39 -0500 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1os5wk-0003MA-EL for help-gnu-emacs@gnu.org; Mon, 07 Nov 2022 12:30:06 -0500 Original-Received: from ciao.gmane.io ([116.202.254.214]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1os5wh-0002G3-7e for help-gnu-emacs@gnu.org; Mon, 07 Nov 2022 12:30:04 -0500 Original-Received: from list by ciao.gmane.io with local (Exim 4.92) (envelope-from ) id 1os5wf-0009CW-Qp for help-gnu-emacs@gnu.org; Mon, 07 Nov 2022 18:30:01 +0100 X-Injected-Via-Gmane: http://gmane.org/ Mail-Followup-To: help-gnu-emacs@gnu.org Mail-Copies-To: never Received-SPF: pass client-ip=116.202.254.214; envelope-from=geh-help-gnu-emacs@m.gmane-mx.org; helo=ciao.gmane.io X-Spam_score_int: -15 X-Spam_score: -1.6 X-Spam_bar: - X-Spam_report: (-1.6 / 5.0 requ) BAYES_00=-1.9, HEADER_FROM_DIFFERENT_DOMAINS=0.25, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=no autolearn_force=no X-Spam_action: no action X-Mailman-Approved-At: Tue, 08 Nov 2022 05:52:31 -0500 X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane-mx.org@gnu.org Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane-mx.org@gnu.org Xref: news.gmane.io gmane.emacs.help:140823 Archived-At: Drew Adams wrote: >> You mean like this? >> >> (defun enum (&optional beg end suf) >> "Enumerate each line from BEG to END, counting from one. >> Use SUF as a suffix to the digits inserted. >> BEG defaults to the beginning of the buffer, >> END defaults to the end of the buffer, and >> SUF defaults to \". \"" >> (interactive >> `(,@(if (use-region-p) >> (list (region-beginning) (region-end)) >> (list nil nil) ) >> ,(when current-prefix-arg >> (read-string "suffix: ") ))) >> (or beg (setq beg (point-min))) >> (or end (setq end (point-max))) > > Sure, why not? Well, because it requires Lisp code and manual work to do routine stuff (use the region if set, assign default values to optional arguments), all that can be automated several steps further pretty easily I dare say ... -- underground experts united https://dataswamp.org/~incal