Clearing unecessary packages
This commit is contained in:
parent
44bfd2fa1f
commit
146649a99f
105
config.org
105
config.org
|
|
@ -136,88 +136,6 @@ Emacs Dashboard Config :
|
||||||
("?" "" "?/h" #'show-help nil "<" ">"))
|
("?" "" "?/h" #'show-help nil "<" ">"))
|
||||||
))
|
))
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
** EXWM
|
|
||||||
Emacs X Window Manager
|
|
||||||
|
|
||||||
+BEGIN_SRC emacs-lisp
|
|
||||||
(use-package exwm
|
|
||||||
:ensure t
|
|
||||||
:config
|
|
||||||
(require 'exwm-config)
|
|
||||||
(exwm-config-default))
|
|
||||||
+END_SRC
|
|
||||||
|
|
||||||
EXWM System Tray
|
|
||||||
+BEGIN_SRC emacs-lisp
|
|
||||||
(require 'exwm-systemtray)
|
|
||||||
(exwm-systemtray-enable)
|
|
||||||
+END_SRC
|
|
||||||
|
|
||||||
If not using EXWM, it will ask to replace the Window Manager with EXWM, I do not like this prompt when using Emacs on other Window Managers.
|
|
||||||
+BEGIN_SRC emacs-lisp
|
|
||||||
(setq exwm-replace 'nil)
|
|
||||||
+END_SRC
|
|
||||||
|
|
||||||
Ido gets automatically enabled in the default EXWM configuration, as we're using Ivy. Let's disable it.
|
|
||||||
#+BEGIN_SRC emacs-lisp
|
|
||||||
(ido-mode -1)
|
|
||||||
#+END_SRC
|
|
||||||
|
|
||||||
Set Number of Workspaces initially created.
|
|
||||||
+BEGIN_SRC emacs-lisp
|
|
||||||
(setq exwm-workspace-number 10)
|
|
||||||
+END_SRC
|
|
||||||
|
|
||||||
EXWM Specific Keybindings
|
|
||||||
+BEGIN_SRC emacs-lisp
|
|
||||||
|
|
||||||
; Set whether workspaces wrap around or not.
|
|
||||||
(defvar exwm-workspace-switch-wrap t)
|
|
||||||
|
|
||||||
(defun exwm/exwm-workspace-next ()
|
|
||||||
"Switch to next exwm-workspace (to the right)."
|
|
||||||
(interactive)
|
|
||||||
(let* ((only-workspace? (equal exwm-workspace-number 1))
|
|
||||||
(overflow? (= exwm-workspace-current-index (1- exwm-workspace-number))))
|
|
||||||
(cond
|
|
||||||
(only-workspace? nil)
|
|
||||||
(overflow? (when exwm-workspace-switch-wrap
|
|
||||||
(exwm-workspace-switch 0)))
|
|
||||||
(t (exwm-workspace-switch (1+ exwm-workspace-current-index))))))
|
|
||||||
|
|
||||||
(defun exwm/exwm-workspace-prev ()
|
|
||||||
"Switch to next exwm-workspace (to the left)."
|
|
||||||
(interactive)
|
|
||||||
(let* ((only-workspace? (equal exwm-workspace-number 1))
|
|
||||||
(overflow? (= exwm-workspace-current-index 0)))
|
|
||||||
(cond
|
|
||||||
(only-workspace? nil)
|
|
||||||
(overflow? (when exwm-workspace-switch-wrap
|
|
||||||
(exwm-workspace-switch (1- exwm-workspace-number))))
|
|
||||||
(t (exwm-workspace-switch (1- exwm-workspace-current-index))))))
|
|
||||||
|
|
||||||
(global-set-key (kbd "<s-right>") 'exwm/exwm-workspace-next)
|
|
||||||
(global-set-key (kbd "<s-left>") 'exwm/exwm-workspace-prev)
|
|
||||||
(global-set-key (kbd "s-e") 'evil-quit-all)
|
|
||||||
(global-set-key (kbd "s-k") 'exwm-workspace-move)
|
|
||||||
(global-set-key (kbd "s-w") 'exwm-workspace-swap)
|
|
||||||
+END_SRC
|
|
||||||
** The Emacs Application Framework
|
|
||||||
The Emacs Application Framework is a big project, please check the README before use, install dependencies etc.
|
|
||||||
|
|
||||||
+BEGIN_SRC emacs-lisp
|
|
||||||
(use-package eaf
|
|
||||||
:load-path "~/.emacs.d/site-lisp/emacs-application-framework"
|
|
||||||
; Set to "/usr/share/emacs/site-lisp/eaf" if installed from AUR
|
|
||||||
:bind
|
|
||||||
("C-c C-f" . 'eaf-open)
|
|
||||||
:custom
|
|
||||||
(eaf-find-alternate-file-in-dired t)
|
|
||||||
:config
|
|
||||||
(eaf-bind-key scroll_up "C-n" eaf-pdf-viewer-keybinding)
|
|
||||||
(eaf-bind-key scroll_down "C-p" eaf-pdf-viewer-keybinding)
|
|
||||||
(eaf-bind-key take_photo "p" eaf-camera-keybinding))
|
|
||||||
+END_SRC
|
|
||||||
** Dynamic Window Tiling
|
** Dynamic Window Tiling
|
||||||
*** Edwina
|
*** Edwina
|
||||||
Edwina is a dynamic window manager for Emacs.
|
Edwina is a dynamic window manager for Emacs.
|
||||||
|
|
@ -259,25 +177,6 @@ Call Function on Startup
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
(fullscreen)
|
(fullscreen)
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
** Symon
|
|
||||||
A system resource viewer
|
|
||||||
|
|
||||||
Add hashtag before + to enable
|
|
||||||
|
|
||||||
+BEGIN_SRC emacs-lisp
|
|
||||||
(use-package symon
|
|
||||||
:ensure t
|
|
||||||
:init
|
|
||||||
(symon-mode 1))
|
|
||||||
+END_SRC
|
|
||||||
** DMenu
|
|
||||||
A recreation of the iconic Suckless Dynamic Menu.
|
|
||||||
#+BEGIN_SRC emacs-lisp
|
|
||||||
(use-package dmenu
|
|
||||||
:ensure t
|
|
||||||
:bind
|
|
||||||
("s-d" . 'dmenu))
|
|
||||||
#+END_SRC
|
|
||||||
** Evil Mode
|
** Evil Mode
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
(use-package evil
|
(use-package evil
|
||||||
|
|
@ -308,8 +207,8 @@ A recreation of the iconic Suckless Dynamic Menu.
|
||||||
(org-latex-export-to-pdf)
|
(org-latex-export-to-pdf)
|
||||||
(update-other-buffer))
|
(update-other-buffer))
|
||||||
|
|
||||||
(define-key org-mode-map (kbd "C-c lr") 'org-compile-latex-and-update-other-buffer)
|
(define-key org-mode-map (kbd "C-c rl") 'org-compile-latex-and-update-other-buffer)
|
||||||
(define-key org-mode-map (kbd "C-c br") 'org-compile-beamer-and-update-other-buffer)
|
(define-key org-mode-map (kbd "C-c rb") 'org-compile-beamer-and-update-other-buffer)
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
*** LateX Preview
|
*** LateX Preview
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue