GNU logs - #77081, boring messages

Message sent to emacs-devel@HIDDEN, bug-gnu-emacs@HIDDEN:

Subject: bug#77081: [PATCH] New minor mode: `electric-block-comment-mode'
Resent-From: Elijah Gabe =?UTF-8?Q?P=C3=A9rez?= <eg642616@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: emacs-devel@HIDDEN, bug-gnu-emacs@HIDDEN
Resent-Date: Mon, 17 Mar 2025 19:41:02 +0000
Resent-Message-ID: <handler.77081.B.1742240440517 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
To: 77081 <at> debbugs.gnu.org
Cc: emacs-devel@HIDDEN
From: Elijah Gabe =?UTF-8?Q?P=C3=A9rez?= <eg642616@HIDDEN>
Date: Mon, 17 Mar 2025 13:40:24 -0600
Message-ID: <87cyefmonr.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="=-=-="
Received-SPF: pass client-ip=2607:f8b0:4864:20::241;
 envelope-from=eg642616@HIDDEN; helo=mail-oi1-x241.google.com
X-Spam_score_int: -17
X-Spam_score: -1.8
X-Spam_bar: -
X-Spam_report: (-1.8 / 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,
 FREEMAIL_ENVFROM_END_DIGIT=0.25, FREEMAIL_FROM=0.001, HTML_MESSAGE=0.001,
 RCVD_IN_DNSWL_NONE=-0.0001, SPF_HELO_NONE=0.001,
 SPF_PASS=-0.001 autolearn=ham autolearn_force=no
X-Spam_action: no action
X-Spam-Score: 1.2 (+)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview:  Hello, This minor automatically lets you close block comment
 when typing a block comment start. Thus... #+begin_src typing /* in c-mode
 automatically inserts */. 
 Content analysis details:   (1.2 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 1.0 SPF_SOFTFAIL           SPF: sender does not match SPF record (softfail)
 -0.0 SPF_HELO_PASS          SPF: HELO matches SPF record
 0.0 FREEMAIL_FROM          Sender email is commonly abused enduser mail
 provider (eg642616[at]gmail.com)
 0.2 FREEMAIL_ENVFROM_END_DIGIT Envelope-from freemail username ends
 in digit (eg642616[at]gmail.com)
 -0.0 RCVD_IN_DNSWL_NONE     RBL: Sender listed at https://www.dnswl.org/,
 no trust [2001:470:142:0:0:0:0:17 listed in] [list.dnswl.org]
 0.0 HTML_MESSAGE           BODY: HTML included in message
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 0.2 (/)

--=-=-=
Content-Type: multipart/alternative; boundary="==-=-="

--==-=-=
Content-Type: text/plain


Hello,

This minor automatically lets you close block comment when typing
a block comment start.

Thus...
#+begin_src
  typing /* in c-mode
  automatically inserts */.

  electric-block-comment-mode: on

  /*|
    ^ cursor

  /* | */
     ^ cursor

  Or in lua --[[ inserts ]]--.

  electric-block-comment-mode: on

  --[[|
      ^ cursor

  --[[ | ]]--
       ^ cursor
#+end_src

and so on.

*However, there is a problem,*
This minor mode uses =block-comment-start= and =block-comment-end=
variables, which most of the major modes do not use or define.

The reason I decided to use these variables is because are more explicit
with the type of comment that is used/supported.

I would like to hear your feedback.




--==-=-=
Content-Type: text/html

<p>
Hello,
</p>

<p>
This minor automatically lets you close block comment when typing
a block comment start.
</p>

<p>
Thus&#x2026;
</p>
<div class="org-src-container">
<pre style="color: #FCFCFA; background-color: #2D2A2E; padding: 0.5em; border-radius: 5px;" class="src src-nil">typing /* in c-mode
automatically inserts */.

electric-block-comment-mode: on

/*|
  ^ cursor

/* | */
   ^ cursor

Or in lua --[[ inserts ]]--.

electric-block-comment-mode: on

--[[|
    ^ cursor

--[[ | ]]--
     ^ cursor
</pre>
</div>

<p>
and so on.
</p>

<p>
<b>However, there is a problem,</b>
This minor mode uses <code>block-comment-start</code> and <code>block-comment-end</code>
variables, which most of the major modes do not use or define.
</p>

<p>
The reason I decided to use these variables is because are more explicit
with the type of comment that is used/supported.
</p>

<p>
I would like to hear your feedback.
</p>

--==-=-=--

--=-=-=
Content-Type: text/x-patch
Content-Disposition: attachment;
 filename=0001-New-minor-mode-electric-block-comment-mode.patch

From 45414d4b0d47ddd9300fcc24723e0aa5e4efc8cb Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?El=C3=ADas=20Gabriel=20P=C3=A9rez?= <eg642616@HIDDEN>
Date: Mon, 17 Mar 2025 12:56:52 -0600
Subject: [PATCH] New minor mode: `electric-block-comment-mode'

This minor automatically lets you close block comment when typing
a block comment start.  Thus, typing "/*" in c-mode automatically
inserts "*/".

* etc/NEWS: Add minor-mode item.
* lisp/electric.el (electric-block-comment-post-self-insert-function):
New function.
(electric-block-comment-mode): New minor mode definition.
---
 etc/NEWS         |  4 ++++
 lisp/electric.el | 28 ++++++++++++++++++++++++++++
 2 files changed, 32 insertions(+)

diff --git a/etc/NEWS b/etc/NEWS
index b33f7cec73f..0924e86f691 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -111,6 +111,10 @@ If you have been using these variables in Lisp code (for example, in
 font-lock rules), simply quote the symbol, to use the face directly
 instead of its now-obsolete variable.
 
+** New minor mode 'electric-block-comment-mode'
+This mode automatically close block comment typed, thus typing
+"/*" in c-mode automatically inserts "*/".
+
 ** Network Security Manager (NSM) is now more strict.
 
 *** NSM warns about TLS 1.1 by default.
diff --git a/lisp/electric.el b/lisp/electric.el
index 39e13e1ca0c..c561d168883 100644
--- a/lisp/electric.el
+++ b/lisp/electric.el
@@ -731,6 +731,34 @@ electric-quote-local-mode
     (setq-default electric-quote-mode nil) ; But keep it globally disabled.
     )))
 
+;;; Electric comment block
+
+(defun electric-block-comment-post-self-insert-function ()
+  "Function that `electric-block-comment' adds to `post-self-insert-hook'.
+This closes block comment when a block comment start is typed."
+  (when (and block-comment-start block-comment-end
+             ;; Check if we are exactly behind the block comment start
+             (save-excursion
+               (re-search-backward (regexp-quote block-comment-start)
+                                   (- (point) (length block-comment-start))
+                                   t))
+             ;; And if there is not anything front us
+             (looking-at-p (concat "[^ [:space:]]")))
+    (insert " ")
+    (save-excursion
+      (insert " */"))))
+
+
+(define-minor-mode electric-block-comment-mode
+  "Toggle automatic close comment blocks (Electric Comment mode).
+
+When enabled, typing `block-comment-start' closes it inserting their
+corresponding `block-comment-end'."
+  :group 'electricity
+  (if electric-block-comment-mode
+      (add-hook 'post-self-insert-hook #'electric-block-comment-post-self-insert-function 10 t)
+    (remove-hook 'post-self-insert-hook #'electric-block-comment-post-self-insert-function t)))
+
 (provide 'electric)
 
 ;;; electric.el ends here
-- 
2.48.1


--=-=-=
Content-Type: text/plain


-- 
                                          - E.G via GNU Emacs and Org.

--=-=-=--

Message sent:

Content-Disposition: inline
Content-Transfer-Encoding: quoted-printable
MIME-Version: 1.0
X-Mailer: MIME-tools 5.505 (Entity 5.505)
Content-Type: text/plain; charset=utf-8
X-Loop: help-debbugs@HIDDEN
From: help-debbugs@HIDDEN (GNU bug Tracking System)
To: Elijah Gabe =?UTF-8?Q?P=C3=A9rez?= <eg642616@HIDDEN>
Subject: bug#77081: Acknowledgement ([PATCH] New minor mode:
 `electric-block-comment-mode')
Message-ID: <handler.77081.B.1742240440517.ack <at> debbugs.gnu.org>
References: <87cyefmonr.fsf@HIDDEN>
X-Gnu-PR-Message: ack 77081
X-Gnu-PR-Package: emacs
X-Gnu-PR-Keywords: patch
Reply-To: 77081 <at> debbugs.gnu.org
Date: Mon, 17 Mar 2025 19:41:02 +0000

Thank you for filing a new bug report with debbugs.gnu.org.

This is an automatically generated reply to let you know your message
has been received.

Your message is being forwarded to the package maintainers and other
interested parties for their attention; they will reply in due course.

As you requested using X-Debbugs-CC, your message was also forwarded to
  emacs-devel@HIDDEN
(after having been given a bug report number, if it did not have one).

Your message has been sent to the package maintainer(s):
 bug-gnu-emacs@HIDDEN

If you wish to submit further information on this problem, please
send it to 77081 <at> debbugs.gnu.org.

Please do not send mail to help-debbugs@HIDDEN unless you wish
to report a problem with the Bug-tracking system.

--=20
77081: https://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D77081
GNU Bug Tracking System
Contact help-debbugs@HIDDEN with problems

Message sent to bug-gnu-emacs@HIDDEN:

Subject: bug#77081: [PATCH] New minor mode: `electric-block-comment-mode'
Resent-From: Elijah Gabe =?UTF-8?Q?P=C3=A9rez?= <eg642616@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: bug-gnu-emacs@HIDDEN
Resent-Date: Mon, 17 Mar 2025 19:52:02 +0000
Resent-Message-ID: <handler.77081.B77081.174224111817695 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
To: 77081 <at> debbugs.gnu.org
From: Elijah Gabe =?UTF-8?Q?P=C3=A9rez?= <eg642616@HIDDEN>
In-Reply-To: <87cyefmonr.fsf@HIDDEN>
References: <87cyefmonr.fsf@HIDDEN>
Date: Mon, 17 Mar 2025 13:51:48 -0600
Message-ID: <874izrmo4r.fsf@HIDDEN>
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/31.0.50
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="=-=-="
Precedence: list
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>

--=-=-=
Content-Type: multipart/alternative; boundary="==-=-="

--==-=-=
Content-Type: text/plain

I'm not sure how did this mail sent a CC to emacs-devel list.
I'm sorry for the inconvenience.


--==-=-=
Content-Type: text/html

<p>
I'm not sure how did this mail sent a CC to emacs-devel list.
I'm sorry for the inconvenience.
</p>

--==-=-=--

--=-=-=
Content-Type: text/plain



-- 
                                          - E.G via GNU Emacs and Org.

--=-=-=--

Last modified: Mon, 17 Mar 2025 20:00:02 UTC

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997 nCipher Corporation Ltd, 1994-97 Ian Jackson.