diff options
| author | Vibhav Pant | 2015-03-20 01:43:37 +0530 |
|---|---|---|
| committer | Vibhav Pant | 2015-03-20 01:43:37 +0530 |
| commit | 3ffcf0e3dedb94e065733dc0a5923d7fef42de49 (patch) | |
| tree | bcc8547fbca92f6bb0301dd0b8cedc0dfb813a89 | |
| parent | ccf00107f7aa8897cde017bec3717ecc350515f7 (diff) | |
| download | emacs-3ffcf0e3dedb94e065733dc0a5923d7fef42de49.tar.gz emacs-3ffcf0e3dedb94e065733dc0a5923d7fef42de49.zip | |
Call delete-backward-space interactively.
* lisp/progmodes/cperl-mode.el (cperl-electric-backspace):
Call delete-backward-space interactively instead of delete-char.
* lisp/Changelog: Fix previous changelog.
| -rw-r--r-- | lisp/ChangeLog | 11 | ||||
| -rw-r--r-- | lisp/progmodes/cperl-mode.el | 2 |
2 files changed, 10 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a2500e3fadc..df2211be169 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2015-03-19 Vibhav Pant <vibhavp@gmail.com> | ||
| 2 | |||
| 3 | * lisp/progmodes/cperl-mode.el (cperl-electric-backspace): | ||
| 4 | Call delete-backward-space interactively instead of delete-char. | ||
| 5 | |||
| 1 | 2015-03-19 Stefan Monnier <monnier@iro.umontreal.ca> | 6 | 2015-03-19 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 7 | ||
| 3 | * emacs-lisp/pcase.el (pcase-lambda): Rewrite. | 8 | * emacs-lisp/pcase.el (pcase-lambda): Rewrite. |
| @@ -62,8 +67,10 @@ | |||
| 62 | 67 | ||
| 63 | 2015-03-19 Vibhav Pant <vibhavp@gmail.com> | 68 | 2015-03-19 Vibhav Pant <vibhavp@gmail.com> |
| 64 | 69 | ||
| 65 | * lisp/leim/quail/hangul.el | 70 | * lisp/leim/quail/hangul.el (hangul-delete-backward-char) |
| 66 | * lisp/progmodes/cperl-mode.el: Use delete-char instead of | 71 | (hangul-to-hanja-conversion): |
| 72 | * lisp/progmodes/cperl-mode.el (cperl-electric-keyword) | ||
| 73 | (cperl-electric-backspace): Use delete-char instead of | ||
| 67 | delete-backward-char, fixes compilation warnings. | 74 | delete-backward-char, fixes compilation warnings. |
| 68 | 75 | ||
| 69 | 2015-03-18 Michael Albinus <michael.albinus@gmx.de> | 76 | 2015-03-18 Michael Albinus <michael.albinus@gmx.de> |
diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el index f207016187d..2acfc104cf3 100644 --- a/lisp/progmodes/cperl-mode.el +++ b/lisp/progmodes/cperl-mode.el | |||
| @@ -2588,7 +2588,7 @@ Will untabify if `cperl-electric-backspace-untabify' is non-nil." | |||
| 2588 | (delete-region (point) p)) | 2588 | (delete-region (point) p)) |
| 2589 | (if cperl-electric-backspace-untabify | 2589 | (if cperl-electric-backspace-untabify |
| 2590 | (backward-delete-char-untabify arg) | 2590 | (backward-delete-char-untabify arg) |
| 2591 | (delete-char (- arg)))))) | 2591 | (call-interactively 'delete-backward-char))))) |
| 2592 | 2592 | ||
| 2593 | (put 'cperl-electric-backspace 'delete-selection 'supersede) | 2593 | (put 'cperl-electric-backspace 'delete-selection 'supersede) |
| 2594 | 2594 | ||