aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorBozhidar Batsov <[email protected]>2017-04-17 08:33:32 +0300
committerBozhidar Batsov <[email protected]>2017-04-17 08:33:32 +0300
commit6b2f463a695200a10038dbcc5f3a01c50b92da19 (patch)
treee7a87bc749f898b24d381a0aca54a42d3371f1f4
parent829f42a7e7a49a7a27a456b783db821623475886 (diff)
downloadotp-6b2f463a695200a10038dbcc5f3a01c50b92da19.tar.gz
otp-6b2f463a695200a10038dbcc5f3a01c50b92da19.tar.bz2
otp-6b2f463a695200a10038dbcc5f3a01c50b92da19.zip
Drop the redundant erlang-uncomment-region command
-rw-r--r--lib/tools/emacs/erlang.el11
1 files changed, 2 insertions, 9 deletions
diff --git a/lib/tools/emacs/erlang.el b/lib/tools/emacs/erlang.el
index db3b537919..7c99e57b93 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.