[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/ergoemacs-mode b378df1 105/325: Reindent
From: |
Stefan Monnier |
Subject: |
[elpa] externals/ergoemacs-mode b378df1 105/325: Reindent |
Date: |
Sat, 23 Oct 2021 18:48:31 -0400 (EDT) |
branch: externals/ergoemacs-mode
commit b378df1a5d33817dc8921afba859f8c100f33093
Author: Walter Landry <wlandry@caltech.edu>
Commit: Walter Landry <wlandry@caltech.edu>
Reindent
---
ergoemacs-mode.el | 86 +++++++++++++++++++++++++++----------------------------
1 file changed, 43 insertions(+), 43 deletions(-)
diff --git a/ergoemacs-mode.el b/ergoemacs-mode.el
index c537632..26e7eeb 100644
--- a/ergoemacs-mode.el
+++ b/ergoemacs-mode.el
@@ -276,49 +276,49 @@ The `execute-extended-command' is now
\\[execute-extended-command].
:keymap ergoemacs-menu-keymap
(setq ergoemacs-mode--start-p t)
(if (and (not noninteractive)
- (not ergoemacs-mode--start-p))
- (if ergoemacs-mode
- (message "Ergoemacs will be started.")
- (message "Ergoemacs startup canceled."))
- (setq ergoemacs-map--hashkey nil)
- (unless ergoemacs-require--ini-p
- (setq ergoemacs-require--ini-p :ini)
- (when ergoemacs-require
- (dolist (elt ergoemacs-require)
- (apply #'ergoemacs-require elt))))
- (let ((refresh-p
ergoemacs-component-struct--refresh-variables))
- (if ergoemacs-mode
- (progn
- (setq ergoemacs-mode--default-frame-alist nil)
- (dolist (elt (reverse default-frame-alist))
- (push elt ergoemacs-mode--default-frame-alist))
- (run-hooks 'ergoemacs-mode-startup-hook)
- (add-hook 'pre-command-hook
#'ergoemacs-pre-command-hook)
- (add-hook 'post-command-hook
#'ergoemacs-post-command-hook)
- (add-hook 'after-load-functions
#'ergoemacs-after-load-functions)
- (add-hook 'after-load-functions
#'ergoemacs-mode-after-startup-run-load-hooks)
-
- (setq ergoemacs-require--ini-p t)
- (ergoemacs-setup-override-keymap)
- (if refresh-p
- (message "Ergoemacs-mode keys refreshed (%s)"
ergoemacs-keyboard-layout)
- (message "Ergoemacs-mode turned ON (%s)."
ergoemacs-keyboard-layout)))
-
- (modify-all-frames-parameters
ergoemacs-mode--default-frame-alist)
- (unless (assoc 'cursor-type
ergoemacs-mode--default-frame-alist)
- (modify-all-frames-parameters (list (cons 'cursor-type
'box))))
- (setq ergoemacs-mode--default-frame-alist nil)
- (run-hooks 'ergoemacs-mode-shutdown-hook)
- (remove-hook 'post-command-hook
#'ergoemacs-post-command-hook)
- (remove-hook 'pre-command-hook
#'ergoemacs-pre-command-hook)
- (remove-hook 'after-load-functions
#'ergoemacs-after-load-functions)
- (unless refresh-p
- (message "Ergoemacs-mode turned OFF.")
- )
- )
- )
- (setq ergoemacs-mode-started-p t)
- )
+ (not ergoemacs-mode--start-p))
+ (if ergoemacs-mode
+ (message "Ergoemacs will be started.")
+ (message "Ergoemacs startup canceled."))
+ (setq ergoemacs-map--hashkey nil)
+ (unless ergoemacs-require--ini-p
+ (setq ergoemacs-require--ini-p :ini)
+ (when ergoemacs-require
+ (dolist (elt ergoemacs-require)
+ (apply #'ergoemacs-require elt))))
+ (let ((refresh-p ergoemacs-component-struct--refresh-variables))
+ (if ergoemacs-mode
+ (progn
+ (setq ergoemacs-mode--default-frame-alist nil)
+ (dolist (elt (reverse default-frame-alist))
+ (push elt ergoemacs-mode--default-frame-alist))
+ (run-hooks 'ergoemacs-mode-startup-hook)
+ (add-hook 'pre-command-hook #'ergoemacs-pre-command-hook)
+ (add-hook 'post-command-hook #'ergoemacs-post-command-hook)
+ (add-hook 'after-load-functions #'ergoemacs-after-load-functions)
+ (add-hook 'after-load-functions
#'ergoemacs-mode-after-startup-run-load-hooks)
+
+ (setq ergoemacs-require--ini-p t)
+ (ergoemacs-setup-override-keymap)
+ (if refresh-p
+ (message "Ergoemacs-mode keys refreshed (%s)"
ergoemacs-keyboard-layout)
+ (message "Ergoemacs-mode turned ON (%s)."
ergoemacs-keyboard-layout)))
+
+ (modify-all-frames-parameters ergoemacs-mode--default-frame-alist)
+ (unless (assoc 'cursor-type ergoemacs-mode--default-frame-alist)
+ (modify-all-frames-parameters (list (cons 'cursor-type 'box))))
+ (setq ergoemacs-mode--default-frame-alist nil)
+ (run-hooks 'ergoemacs-mode-shutdown-hook)
+ (remove-hook 'post-command-hook #'ergoemacs-post-command-hook)
+ (remove-hook 'pre-command-hook #'ergoemacs-pre-command-hook)
+ (remove-hook 'after-load-functions #'ergoemacs-after-load-functions)
+ (unless refresh-p
+ (message "Ergoemacs-mode turned OFF.")
+ )
+ )
+ )
+ (setq ergoemacs-mode-started-p t)
+ )
)
(defvar ergoemacs--gzip (executable-find "gzip")
- [elpa] externals/ergoemacs-mode b62f068 030/325: Remove more package stuff, (continued)
- [elpa] externals/ergoemacs-mode b62f068 030/325: Remove more package stuff, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 46c76c0 036/325: Remove a little modal, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode c88308e 026/325: Make ergoemacs-test-keep-ctl-s work, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode d97731c 266/325: Add tab indent region when active again, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 21624e9 269/325: Bug fix for calculate bindings and update for the modes modified, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 3edd1e1 268/325: Save and restore keymaps on startup, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 8cfa471 270/325: Use nadvice, as requested by Stephan Monnier, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode c9d4c1b 015/325: Remove ergoemacs-package, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode b2a8bb7 099/325: Make 'compile' the default make target, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 18b3859 121/325: Simplify split-window binding, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode b378df1 105/325: Reindent,
Stefan Monnier <=
- [elpa] externals/ergoemacs-mode c973446 124/325: Remove redundant fixed-newline, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode cbfa5a9 115/325: Remove some now obsolete <apps> tests, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 1bd971e 137/325: Remove iswitchb bindings and misc cleanup, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 377d498 107/325: Set variables properly. Lots of duplication., Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode c09952e 125/325: Remove all C-h help bindings except ergoemacs-describe-current-theme, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode da06d4f 112/325: Fix more warnings. Remove compatibility with <25.1., Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 9ef7b6d 120/325: Add newlines to scratch message, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 051a0c9 110/325: Hard code more theme==standard, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 1d4ddc3 114/325: Remove M-y bindings for search., Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 766cb61 129/325: Move term bindings into a proper function run as a hook when loading term, Stefan Monnier, 2021/10/23