Emacs : disabled command cause abnormal operation

This commit is contained in:
2023-01-13 16:22:45 +09:00
parent 3f80b4e74a
commit 9542eb2a5f

View File

@ -313,17 +313,16 @@ emacs built-in package config
#+end_src #+end_src
**** Whiteroom **** Whiteroom
#+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-ui.el #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-ui.el
(use-package writeroom-mode ;;(use-package writeroom-mode
:disabled ;; :defer t
:defer t ;; :straight (:build t)
:straight (:build t) ;; :init (global-writeroom-mode 1)
:init (global-writeroom-mode 1) ;; :config
:config ;; (setq writeroom-width 100
(setq writeroom-width 100 ;; writeroom-fullscreen-effect nil
writeroom-fullscreen-effect nil ;; writeroom-maximize-window nil
writeroom-maximize-window nil ;; writeroom-mode-line t
writeroom-mode-line t ;; writeroom-major-modes '(text-mode org-mode markdown-mode nov-mode Info-mode)))
writeroom-major-modes '(text-mode org-mode markdown-mode nov-mode Info-mode)))
#+end_src #+end_src
**** Visual Fill Column **** Visual Fill Column
#+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-ui.el #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-ui.el
@ -584,15 +583,15 @@ https://github.com/SystemCrafter/crafted-emacs
(vertico-cycle t) (vertico-cycle t)
:init :init
(vertico-mode)) (vertico-mode))
(use-package vertico-posframe ;;(use-package vertico-posframe
:disabled ;;:disabled
:after vertico ;;:after vertico
:ensure t ;;:ensure t
:init ;;:init
(setq vertico-posframe-parameters ;;(setq vertico-posframe-parameters
`((left-fringe . 8) ;;`((left-fringe . 8)
(right-fringe . 8) (alpha . 100))) ;;(right-fringe . 8) (alpha . 100)))
(vertico-posframe-mode 1)) ;;(vertico-posframe-mode 1))
#+end_src #+end_src
**** Marginalia **** Marginalia
annotations placed at the margin of the minibuffer annotations placed at the margin of the minibuffer
@ -812,45 +811,45 @@ get link from pdf,
*** Workspaces *** Workspaces
**** Tabspace **** Tabspace
#+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-workspaces.el #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-workspaces.el
(use-package tabspaces ;;(use-package tabspaces
:disabled ;; :disabled
;; use this next line only if you also use straight, otherwise ignore it. ;; ;; use this next line only if you also use straight, otherwise ignore it.
:straight (:type git :host github :repo "mclear-tools/tabspaces") ;; :straight (:type git :host github :repo "mclear-tools/tabspaces")
:hook (after-init . tabspaces-mode) ;; use this only if you want the minor-mode loaded at startup. ;; :hook (after-init . tabspaces-mode) ;; use this only if you want the minor-mode loaded at startup.
:commands (tabspaces-switch-or-create-workspace ;; :commands (tabspaces-switch-or-create-workspace
tabspaces-open-or-create-project-and-workspace) ;; tabspaces-open-or-create-project-and-workspace)
:custom ;; :custom
(tabspaces-use-filtered-buffers-as-default t) ;; (tabspaces-use-filtered-buffers-as-default t)
(tabspaces-default-tab "Default") ;; (tabspaces-default-tab "Default")
(tabspaces-remove-to-default t) ;; (tabspaces-remove-to-default t)
(tabspaces-include-buffers '("*scratch*")) ;; (tabspaces-include-buffers '("*scratch*"))
;; sessions ;; ;; sessions
(tabspaces-session t) ;; (tabspaces-session t)
(tabspaces-session-auto-restore t) ;; (tabspaces-session-auto-restore t)
:config ;; :config
(ju/leader-key-def ;; (ju/leader-key-def
"TAB" '(tabspaces-command-map :which-key "tabspaces-command-map"))) ;; "TAB" '(tabspaces-command-map :which-key "tabspaces-command-map")))
#+end_src #+end_src
**** Perspective **** Perspective
#+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-workspaces.el #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-workspaces.el
(use-package perspective ;;(use-package perspective
:disabled ;; :disabled
:demand t ;; :demand t
:bind (("C-M-j" . consult-buffer) ;; :bind (("C-M-j" . consult-buffer)
("C-M-k" . persp-switch) ;; ("C-M-k" . persp-switch)
("C-M-n" . persp-next) ;; ("C-M-n" . persp-next)
("C-x k" . persp-kill-buffer*)) ;; ("C-x k" . persp-kill-buffer*))
:custom ;; :custom
(persp-initial-frame-name "Main") ;; (persp-initial-frame-name "Main")
(persp-mode-prefix-key (kbd "C-c p")) ;; (persp-mode-prefix-key (kbd "C-c p"))
:config ;; :config
(ju/leader-key-def ;; (ju/leader-key-def
"TAB" '(perspective-map :which-key "perspective")) ;; "TAB" '(perspective-map :which-key "perspective"))
;; Running `persp-mode' multiple times resets the perspective list... ;; ;; Running `persp-mode' multiple times resets the perspective list...
(unless (equal persp-mode t) ;; (unless (equal persp-mode t)
(persp-mode))) ;; (persp-mode)))
(provide 'custom-workspaces) ;;(provide 'custom-workspaces)
;;; custom-workspaces.el ends here ;;; custom-workspaces.el ends here
#+end_src #+end_src
*** Latex *** Latex