sam217pa / emacs-iexpand Goto Github PK

Debugger entered--Lisp error: (wrong-type-argument arrayp nil)
lookup-key((keymap #^[nil nil keymap
#^^[3 0 set-mark-command compro/beginning-of-line backward-char mode-specific-command-prefix delete-char move-end-of-line forward-char keyboard-quit help-command indent-for-tab-command electric-newline-and-maybe-indent kill-line recenter-top-bottom newline next-line compro/open-line-below previous-line quoted-insert isearch-backward isearch-forward treemacs universal-argument scroll-up-command kill-region Control-X-prefix yank undo ESC-prefix toggle-input-method abort-recursive-edit nil move-text-up self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command ...] #^^[1 0 #^^[2 0
#^^[3 0 set-mark-command compro/beginning-of-line backward-char mode-specific-command-prefix delete-char move-end-of-line forward-char keyboard-quit help-command indent-for-tab-command electric-newline-and-maybe-indent kill-line recenter-top-bottom newline next-line compro/open-line-below previous-line quoted-insert isearch-backward isearch-forward treemacs universal-argument scroll-up-command kill-region Control-X-prefix yank undo ESC-prefix toggle-input-method abort-recursive-edit nil move-text-up self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command ...] self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command] self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command] self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command ...] (67108923 . iedit-mode) (company-dummy-event . company-ignore) (f9 keymap (112 keymap (118 keymap (101 . pipenv-envs) (103 . pipenv-graph) (100 . pipenv-deactivate) (97 . pipenv-activate)))) (M-S-mouse-3 . mc/add-cursor-on-click) (M-S-mouse-2 . mc/add-cursor-on-click) (M-S-mouse-1 . mc/add-cursor-on-click) (M-down . mc/skip-to-next-like-this) (M-S-down . mc/mark-next-like-this) (M-up . mc/skip-to-previous-like-this) (M-S-up . mc/mark-previous-like-this) (33554435 . mc/edit-lines) (quail-advice . quail-advice) (33554444 . compro/comint/clear-last-output) (remap keymap (kill-word . compro/comint/kill-word)) (67108925 . hydra-er/body) (S-down-mouse-3 . minions-minor-modes-menu) (33554447 . compro/open-line-above) (33554448 . list-processes) (C-f4 . kill-current-buffer) (C-S-mouse-1 . imenu) (C-m . delete-other-windows) (C-iso-lefttab . tab-line-switch-to-prev-tab) (C-S-tab . tab-line-switch-to-prev-tab) (C-backtab . tab-line-switch-to-prev-tab) (C-tab . tab-line-switch-to-next-tab) (S-mouse-3 . kmacro-end-call-mouse) (paste . clipboard-yank) (copy . clipboard-kill-ring-save) (cut . clipboard-kill-region) (f18 . clipboard-yank) (f16 . clipboard-kill-ring-save) (f20 . clipboard-kill-region) (C-mouse-5 . mouse-wheel-text-scale) (C-mouse-4 . mouse-wheel-text-scale) (M-mouse-6 . mwheel-scroll) (M-mouse-7 . mwheel-scroll) (M-mouse-5 . mwheel-scroll) (M-mouse-4 . mwheel-scroll) (S-mouse-6 . mwheel-scroll) (S-mouse-7 . mwheel-scroll) (S-mouse-5 . mwheel-scroll) (S-mouse-4 . mwheel-scroll) ...) nil)
(set (make-local-variable 'iexpand--fallback-cmd) (lookup-key (current-global-map) (iexpand--get-expanding-key)))
iexpand--set-fallback-behaviour()
(progn (iexpand--set-fallback-behaviour) (iexpand--define-key iexpand-default-key))
(if iexpand-minor-mode (progn (iexpand--set-fallback-behaviour) (iexpand--define-key iexpand-default-key)))
(let ((last-message (current-message))) (setq iexpand-minor-mode (if (eq arg 'toggle) (not iexpand-minor-mode) (> (prefix-numeric-value arg) 0))) (if iexpand-minor-mode (progn (iexpand--set-fallback-behaviour) (iexpand--define-key iexpand-default-key))) (run-hooks 'iexpand-minor-mode-hook (if iexpand-minor-mode 'iexpand-minor-mode-on-hook 'iexpand-minor-mode-off-hook)) (if (called-interactively-p 'any) (progn nil (if (and (current-message) (not (equal last-message (current-message)))) nil (let ((local " in current buffer")) (message "iexpand minor mode %sabled%s" (if iexpand-minor-mode "en" "dis") local))))))
iexpand-minor-mode(t)
(if (iexpand--check-current-mode) nil (iexpand-minor-mode t))
turn-on-iexpand-minor-mode()
(if iexpand-minor-mode (progn (iexpand-minor-mode -1) (turn-on-iexpand-minor-mode)) (turn-on-iexpand-minor-mode))
(if (eq iexpand-minor-mode-major-mode major-mode) nil (if iexpand-minor-mode (progn (iexpand-minor-mode -1) (turn-on-iexpand-minor-mode)) (turn-on-iexpand-minor-mode)))
(if iexpand-minor-mode-set-explicitly nil (if (eq iexpand-minor-mode-major-mode major-mode) nil (if iexpand-minor-mode (progn (iexpand-minor-mode -1) (turn-on-iexpand-minor-mode)) (turn-on-iexpand-minor-mode))))
(save-current-buffer (set-buffer buf) (if iexpand-minor-mode-set-explicitly nil (if (eq iexpand-minor-mode-major-mode major-mode) nil (if iexpand-minor-mode (progn (iexpand-minor-mode -1) (turn-on-iexpand-minor-mode)) (turn-on-iexpand-minor-mode)))) (setq iexpand-minor-mode-major-mode major-mode))
(progn (save-current-buffer (set-buffer buf) (if iexpand-minor-mode-set-explicitly nil (if (eq iexpand-minor-mode-major-mode major-mode) nil (if iexpand-minor-mode (progn (iexpand-minor-mode -1) (turn-on-iexpand-minor-mode)) (turn-on-iexpand-minor-mode)))) (setq iexpand-minor-mode-major-mode major-mode)))
(if (buffer-live-p buf) (progn (save-current-buffer (set-buffer buf) (if iexpand-minor-mode-set-explicitly nil (if (eq iexpand-minor-mode-major-mode major-mode) nil (if iexpand-minor-mode (progn (iexpand-minor-mode -1) (turn-on-iexpand-minor-mode)) (turn-on-iexpand-minor-mode)))) (setq iexpand-minor-mode-major-mode major-mode))))
(let ((buf (car --dolist-tail--))) (if (buffer-live-p buf) (progn (save-current-buffer (set-buffer buf) (if iexpand-minor-mode-set-explicitly nil (if (eq iexpand-minor-mode-major-mode major-mode) nil (if iexpand-minor-mode (progn ... ...) (turn-on-iexpand-minor-mode)))) (setq iexpand-minor-mode-major-mode major-mode)))) (setq --dolist-tail-- (cdr --dolist-tail--)))
(while --dolist-tail-- (let ((buf (car --dolist-tail--))) (if (buffer-live-p buf) (progn (save-current-buffer (set-buffer buf) (if iexpand-minor-mode-set-explicitly nil (if (eq iexpand-minor-mode-major-mode major-mode) nil (if iexpand-minor-mode ... ...))) (setq iexpand-minor-mode-major-mode major-mode)))) (setq --dolist-tail-- (cdr --dolist-tail--))))
(let ((--dolist-tail-- buffers)) (while --dolist-tail-- (let ((buf (car --dolist-tail--))) (if (buffer-live-p buf) (progn (save-current-buffer (set-buffer buf) (if iexpand-minor-mode-set-explicitly nil (if ... nil ...)) (setq iexpand-minor-mode-major-mode major-mode)))) (setq --dolist-tail-- (cdr --dolist-tail--)))))
(let ((buffers iexpand-global-mode-buffers)) (setq iexpand-global-mode-buffers nil) (let ((--dolist-tail-- buffers)) (while --dolist-tail-- (let ((buf (car --dolist-tail--))) (if (buffer-live-p buf) (progn (save-current-buffer (set-buffer buf) (if iexpand-minor-mode-set-explicitly nil ...) (setq iexpand-minor-mode-major-mode major-mode)))) (setq --dolist-tail-- (cdr --dolist-tail--))))))
iexpand-global-mode-enable-in-buffers()
run-hooks(after-change-major-mode-hook)
run-mode-hooks(emacs-lisp-mode-hook)
emacs-lisp-mode()
funcall-interactively(emacs-lisp-mode)
call-interactively(emacs-lisp-mode record nil)
command-execute(emacs-lisp-mode record)
execute-extended-command(nil "emacs-lisp-mode" nil)
funcall-interactively(execute-extended-command nil "emacs-lisp-mode" nil)
call-interactively(execute-extended-command nil nil)
command-execute(execute-extended-command)