From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Zaz Brown Newsgroups: gmane.emacs.bugs Subject: bug#63626: [PATCH] Make forward and backward-to-word arg optional Date: Sat, 20 May 2023 21:33:51 -0700 Message-ID: Mime-Version: 1.0 Content-Type: text/plain; charset="UTF-8" Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="30852"; mail-complaints-to="usenet@ciao.gmane.io" Cc: dalanicolai@gmail.com To: 63626@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Sun May 21 09:33:45 2023 Return-path: Envelope-to: geb-bug-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 1q0dZZ-0007ov-GS for geb-bug-gnu-emacs@m.gmane-mx.org; Sun, 21 May 2023 09:33:45 +0200 Original-Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1q0dYu-0004N8-GZ; Sun, 21 May 2023 03:33:04 -0400 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 1q0dYt-0004Mu-5F for bug-gnu-emacs@gnu.org; Sun, 21 May 2023 03:33:03 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1q0dYs-0004Ob-TY for bug-gnu-emacs@gnu.org; Sun, 21 May 2023 03:33:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1q0dYs-0000va-P8 for bug-gnu-emacs@gnu.org; Sun, 21 May 2023 03:33:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Zaz Brown Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sun, 21 May 2023 07:33:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 63626 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.16846543493505 (code B ref -1); Sun, 21 May 2023 07:33:02 +0000 Original-Received: (at submit) by debbugs.gnu.org; 21 May 2023 07:32:29 +0000 Original-Received: from localhost ([127.0.0.1]:59960 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1q0dYL-0000uM-3B for submit@debbugs.gnu.org; Sun, 21 May 2023 03:32:29 -0400 Original-Received: from lists.gnu.org ([209.51.188.17]:44294) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1q0alr-0003m9-1y for submit@debbugs.gnu.org; Sun, 21 May 2023 00:34:17 -0400 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 1q0aln-0005ej-Q8 for bug-gnu-emacs@gnu.org; Sun, 21 May 2023 00:34:13 -0400 Original-Received: from relay4-d.mail.gandi.net ([2001:4b98:dc4:8::224]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1q0alj-0007iC-SK for bug-gnu-emacs@gnu.org; Sun, 21 May 2023 00:34:11 -0400 Original-Received: (Authenticated sender: zazbrown@zazbrown.com) by mail.gandi.net (Postfix) with ESMTPSA id 37406E0006 for ; Sun, 21 May 2023 04:34:03 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=zazbrown.com; s=gm1; t=1684643644; h=from:from:reply-to:subject:subject:date:date:message-id:message-id: to:to:cc:cc:mime-version:mime-version:content-type:content-type; bh=YFNJmEryfMImw1gccOFh8zSt2SBu0VFb6BDgkNXYvv0=; b=PjYx+mUi1HaMXdR1R5RgGGKuPJv4Ad/04p9qk6i9To+tPtrV7U7z+wABagqPr49be+rJm5 Z8PKuptB88kv+l85qc99Kz82CfxDi3PdlVp1lkRhtkqg+MUnaoSKpgZW6fl02uX1CvqcH4 s773J1QvbZEBnxT/1vkCyer54eYVmSzR92HFGGtIAdHhVA7/VyA8dxkeFDqiTv+ZZwAbbZ 4pSSbe5m5HNOSFHzi3sluC+Zcg/n6SIX92ABxgp3uYHq8L9xm9nOOaQ6Z8BDOJmZiFNR+x JA7ZIEzyY0/HruK47qpEyrWUEwklLAv4sIDli/Emx7FSnDCUGnMPZNVt8vkCTw== Original-Received: by mail-pl1-f172.google.com with SMTP id d9443c01a7336-1ae4baa77b2so34329645ad.2 for ; Sat, 20 May 2023 21:34:03 -0700 (PDT) X-Gm-Message-State: AC+VfDxok5zv33ocZItIGmJZXowzlDjjOfrLghrwG7VC9nVpK5TxSoRE ghVkJV98zjJUbX4yp9JkBiJv7UkdMsnzzLoRUbU= X-Google-Smtp-Source: ACHHUZ4gDTO+YxDyn9KObCtBPh2Xj9HM+NAHTDVV6Q7CvXAPSMCTMlSqkJHD82tD9fE8G71XWamLfkHQYu6AsUcnmtE= X-Received: by 2002:a17:902:e889:b0:1a5:2993:8aa6 with SMTP id w9-20020a170902e88900b001a529938aa6mr8380397plg.63.1684643642281; Sat, 20 May 2023 21:34:02 -0700 (PDT) X-Gmail-Original-Message-ID: Received-SPF: softfail client-ip=2001:4b98:dc4:8::224; envelope-from=zazbrown@zazbrown.com; helo=relay4-d.mail.gandi.net X-Spam_score_int: -20 X-Spam_score: -2.1 X-Spam_bar: -- X-Spam_report: (-2.1 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, RCVD_IN_DNSWL_LOW=-0.7, SPF_HELO_NONE=0.001, SPF_SOFTFAIL=0.665, T_SCC_BODY_TEXT_LINE=-0.01 autolearn=ham autolearn_force=no X-Spam_action: no action X-Mailman-Approved-At: Sun, 21 May 2023 03:32:22 -0400 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Xref: news.gmane.io gmane.emacs.bugs:262093 Archived-At: (forward-to-word) throws (wrong-number-of-arguments forward-to-word 0) in spite of the doc string stating: > Move forward until encountering the beginning of a word. > With argument, do this that many times. This behaviour is present in Spacemacs 28.2, and has been confirmed by Daniel Nicolai on Emacs 30. It's also evident in the latest source code. The same issue exists for (backward-to-word). But running each command with M-x works with no argument. I'm new to Emacs, so please take this with a grain of salt. Thank you! --- lisp/misc.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git master/lisp/misc.el arg-optional/lisp/misc.el index ca013d5..f97240e 100644 --- a/lisp/misc.el +++ b/lisp/misc.el @@ -166,18 +166,20 @@ is an upper-case character." (upcase-region (point) (progn (forward-char arg) (point))))) ;;;###autoload -(defun forward-to-word (arg) +(defun forward-to-word (&optional arg) "Move forward until encountering the beginning of a word. With argument, do this that many times." (interactive "^p") + (unless arg (setq arg 1)) (or (re-search-forward (if (> arg 0) "\\W\\b" "\\b\\W") nil t arg) (goto-char (if (> arg 0) (point-max) (point-min))))) ;;;###autoload -(defun backward-to-word (arg) +(defun backward-to-word (&optional arg) "Move backward until encountering the end of a word. With argument, do this that many times." (interactive "^p") + (unless arg (setq arg 1)) (forward-to-word (- arg))) ;;;###autoload -- 2.40.1