bug#5366: (un)comment-line macros

bug#5366: (un)comment-line macros

[Mads Jensen]

[-- Attachment #1: Type: text/plain, Size: 866 bytes --]

Hi,

I wrote the following two very simple macros. Nevertheless, I find them
very useless, and would be pleased if you could include them in a future
version of emacs.

(defun comment-line ()
   "comments the line"
   (interactive)
   (let ((start (point-at-bol))
	(end (point-at-eol)))
     (save-excursion
       (indent-region start end)
       (comment-region start end)
       (if (not (string= major-mode "text-mode"))
           (indent-for-tab-command)))))

(defun uncomment-line ()
   "uncomments the current line"
   (interactive)
   (let ((start (point-at-bol))
         (end (point-at-eol)))
     (save-excursion
       (uncomment-region start end)
       (if (not (string= major-mode "text-mode"))
           (indent-region start end)))))

I bound them to "C-c l" and "C-c u" respectively.

Yours sincerely,
Mads Jensen


[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 260 bytes --]

bug#5366: (un)comment-line macros

[Glenn Morris]

tags 5366 wontfix
stop

Thanks for sending them, but I don't think Emacs needs these commands.