- nil ;; default = off
- action-lock-lighter ;; mode-line
- `(
- (,action-lock-magic-return-key . action-lock-magic-return)
- ))
-
-;; emacs20's easy-mmode-define-minor-mode can't have body. sigh...
-(add-hook 'action-lock-mode-on-hook 'action-lock-initialize-buffer)
-(add-hook 'action-lock-mode-off-hook 'action-lock-restore-buffer)
+ :init-value nil ;; default = off
+ :lighter action-lock-lighter ;; mode-line
+ :keymap `(
+ (,action-lock-magic-return-key . action-lock-magic-return)
+ )
+ (if action-lock-mode
+ (action-lock-initialize-buffer)
+ (action-lock-restore-buffer)))