[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 726291c 058/108: Redo fix for #25
From: |
Artur Malabarba |
Subject: |
[elpa] master 726291c 058/108: Redo fix for #25 |
Date: |
Wed, 25 Mar 2015 18:39:08 +0000 |
branch: master
commit 726291c89de57d1c8b08fee1e126732b7e959d4d
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>
Redo fix for #25
Awesome tip from @tsdh!
---
aggressive-indent.el | 20 ++++++--------------
1 files changed, 6 insertions(+), 14 deletions(-)
diff --git a/aggressive-indent.el b/aggressive-indent.el
index 012e731..3db3819 100644
--- a/aggressive-indent.el
+++ b/aggressive-indent.el
@@ -335,22 +335,14 @@ Assumes that the syntax table is sufficient to find
comments."
(nth 4 (syntax-ppss)))
-;;; Keymap
-(defun delete-backward ()
- "Either `delete-indentation' or call [backspace]."
- (interactive)
- (if (looking-back "^[[:blank:]]+")
- (call-interactively 'delete-indentation)
- (let ((mode nil))
- (execute-kbd-macro [backspace]))))
-
-;; (define-key mode-map "\C-c\C-q" #'indent-defun)
-;; (define-key mode-map [backspace] #'delete-backward)
-
-
;;; Minor modes
:autoload
-(define-minor-mode mode nil nil " =>" nil
+(define-minor-mode mode nil nil " =>"
+ '(("" . aggressive-indent-indent-defun)
+ ([backspace] menu-item "maybe-delete-indentation" ignore
+ :filter (lambda (&optional _)
+ (when (looking-back "^[[:blank:]]+")
+ #'delete-indentation))))
(if mode
(if (and global-aggressive-indent-mode
(or (cl-member-if #'derived-mode-p excluded-modes)
- [elpa] master 45d25c3 045/108: List dependency in the Readme, (continued)
- [elpa] master 45d25c3 045/108: List dependency in the Readme, Artur Malabarba, 2015/03/25
- [elpa] master 32f6156 050/108: Rename changed-list to -changed-list, Artur Malabarba, 2015/03/25
- [elpa] master 94d84bc 051/108: Doc, Artur Malabarba, 2015/03/25
- [elpa] master 63121eb 049/108: Restore point even when errors., Artur Malabarba, 2015/03/25
- [elpa] master 34d80b4 043/108: Remove apology, Artur Malabarba, 2015/03/25
- [elpa] master 2a9c593 052/108: Remove old special treatment for css-mode, Artur Malabarba, 2015/03/25
- [elpa] master 675224c 054/108: Rename gifs, Artur Malabarba, 2015/03/25
- [elpa] master 7a4794a 053/108: Use the do-softly macro, Artur Malabarba, 2015/03/25
- [elpa] master ecfbf94 055/108: Define new delete-backward bound to backspace., Artur Malabarba, 2015/03/25
- [elpa] master e169391 046/108: Prevent electric indenting on ruby-mode, Artur Malabarba, 2015/03/25
- [elpa] master 726291c 058/108: Redo fix for #25,
Artur Malabarba <=
- [elpa] master a8e467c 056/108: Quick fix for the buggy map., Artur Malabarba, 2015/03/25
- [elpa] master dae81af 060/108: Merge pull request #28 from tsdh/master, Artur Malabarba, 2015/03/25
- [elpa] master f70f0ff 059/108: Don't indent in strings (fixes #27), Artur Malabarba, 2015/03/25
- [elpa] master eefeecc 062/108: Add diff-mode and makefile-mode to excluded-modes., Artur Malabarba, 2015/03/25
- [elpa] master e4a4026 061/108: Prevent that to replace the 'message' func to 'ignore' func., Artur Malabarba, 2015/03/25
- [elpa] master 105e746 057/108: Another quickfix, Artur Malabarba, 2015/03/25
- [elpa] master e9fea53 066/108: Fix corner-case with thing-at-point, Artur Malabarba, 2015/03/25
- [elpa] master ae996bb 064/108: Merge pull request #30 from vmfhrmfoaj/master, Artur Malabarba, 2015/03/25
- [elpa] master 6e345d2 063/108: Merge pull request #29 from tsdh/master, Artur Malabarba, 2015/03/25
- [elpa] master 095f778 069/108: Add Custom-mode to excluded modes, Artur Malabarba, 2015/03/25