File 2290-Drop-the-redundant-erlang-uncomment-region... of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 2290-Drop-the-redundant-erlang-uncomment-region-command.patch of Package erlang

From 6b2f463a695200a10038dbcc5f3a01c50b92da19 Mon Sep 17 00:00:00 2001
From: Bozhidar Batsov <bozhidar@batsov.com>
Date: Mon, 17 Apr 2017 08:33:32 +0300
Subject: [PATCH 2/3] Drop the redundant erlang-uncomment-region command

---
 lib/tools/emacs/erlang.el | 11 ++---------
 1 file changed, 2 insertions(+), 9 deletions(-)

diff --git a/lib/tools/emacs/erlang.el b/lib/tools/emacs/erlang.el
index db3b53791..7c99e57b9 100644
--- a/lib/tools/emacs/erlang.el
+++ b/lib/tools/emacs/erlang.el
@@ -123,7 +123,7 @@ variable.")
     ("Edit"
      (("Fill Comment" erlang-fill-paragraph)
       ("Comment Region" comment-region mark-active)
-      ("Uncomment Region" erlang-uncomment-region mark-active)
+      ("Uncomment Region" uncomment-region mark-active)
       nil
       ("Beginning of Function" erlang-beginning-of-function)
       ("End of Function" erlang-end-of-function)
@@ -1052,7 +1052,7 @@ behaviour.")
     (define-key map "\C-c\C-l"  'erlang-compile-display)
     (define-key map "\C-c\C-s"  'erlang-show-syntactic-information)
     (define-key map "\C-c\C-q"  'erlang-indent-function)
-    (define-key map "\C-c\C-u"  'erlang-uncomment-region)
+    (define-key map "\C-c\C-u"  'uncomment-region)
     (define-key map "\C-c\C-y"  'erlang-clone-arguments)
     (define-key map "\C-c\C-a"  'erlang-align-arrows)
     (define-key map "\C-c\C-z"  'erlang-shell-display)
@@ -3356,13 +3356,6 @@ and initial `%':s."
               (fill-prefix comment-fill-prefix))
           (fill-paragraph justify))))))
 
-
-(defun erlang-uncomment-region (beg end)
-  "Uncomment all commented lines in the region."
-  (interactive "r")
-  (uncomment-region beg end))
-
-
 (defun erlang-generate-new-clause ()
   "Create additional Erlang clause header.
 
-- 
2.12.2

Places

File 2290-Drop-the-redundant-erlang-uncomment-region-command.patch of Package erlang

Places