File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -126,15 +126,15 @@ For example, calling with arguments 5 and t yields the symbol `S-f5'."
126126
127127(defvar god-local-mode-map
128128 (let ((map (make-sparse-keymap )))
129- (keymap-set map " <remap> <self-insert-command>" #'god-mode-self-insert )
129+ (keymap-set map " <remap> <self-insert-command>" #'god-mode-self-insert )
130130 (let ((i ?\s ))
131131 (while (< i 256 )
132132 (keymap-set map (single-key-description i) 'god-mode-self-insert )
133133 (setq i (1+ i))))
134134 (when god-mode-enable-function-key-translation
135135 (dotimes (i 35 )
136- (( keymap-set map (single-key-description (god-mode-make-f-key (1+ i))) 'god-mode-self-insert )
137- (keymap-set map (single-key-description (god-mode-make-f-key (1+ i) t )) 'god-mode-self-insert ))
136+ (keymap-set map (single-key-description (god-mode-make-f-key (1+ i))) 'god-mode-self-insert )
137+ (keymap-set map (single-key-description (god-mode-make-f-key (1+ i) t )) 'god-mode-self-insert )))
138138 (keymap-set map " DEL" nil )
139139 (keymap-set map " C-h k" #'god-mode-describe-key )
140140 map))
@@ -189,10 +189,10 @@ if ARG is zero or a positive number, or disable the mode if ARG
189189is a negative number."
190190 (interactive )
191191 (let ((new-status
192- (cond
193- ((null arg) (if (bound-and-true-p god-local-mode) -1 1 ))
194- ((> 0 arg) -1 )
195- (t 1 ))))
192+ (cond
193+ ((null arg) (if (bound-and-true-p god-local-mode) -1 1 ))
194+ ((> 0 arg) -1 )
195+ (t 1 ))))
196196 (setq god-global-mode t )
197197 (mapc (lambda (buffer )
198198 (with-current-buffer buffer
You can’t perform that action at this time.
0 commit comments