Move some configuration to config-submodule.org

This commit is contained in:
Benson Chu 2022-11-25 08:25:55 -06:00
parent 0a643e5864
commit 04ce99bf70
3 changed files with 29 additions and 23 deletions

View file

@ -530,20 +530,6 @@
(use-package e2wm
:bind (("M-+" . e2wm:start-management)))
#+end_src
** Youtube-dl
#+BEGIN_SRC emacs-lisp
(when (executable-find "youtube-dl")
(add-to-list 'load-path "~/.emacs.d/submodule/youtube-dl-emacs/")
(require 'youtube-dl)
(defun youtube-dl-song (url)
(interactive
(list (read-from-minibuffer
"URL: " (or (thing-at-point 'url)
(when interprogram-paste-function
(funcall interprogram-paste-function))))))
(async-shell-command (format "youtube-dl -x -f \"bestaudio[ext=m4a]\" \"%s\"; tageditor -s album=\"youtube-dl\" -f *.m4a" url))))
#+END_SRC
** set-default-directory
#+begin_src emacs-lisp
(defun set-default-directory (dir)
@ -895,11 +881,3 @@
(set-face-attribute 'auto-dim-other-buffers-face nil :background "#700CB3")
#+end_src
* code-compass?
#+begin_src emacs-lisp
(add-to-list 'load-path
(expand-file-name "submodule/code-compass"
user-emacs-directory))
(use-package simple-httpd)
(require 'code-compass)
#+end_src

23
config-submodules.org Normal file
View file

@ -0,0 +1,23 @@
* code-compass?
#+begin_src emacs-lisp
(add-to-list 'load-path
(expand-file-name "submodule/code-compass"
user-emacs-directory))
(use-package simple-httpd)
(require 'code-compass)
(setq c/preferred-browser "firefox")
#+end_src
* Youtube-dl
#+BEGIN_SRC emacs-lisp
(when (executable-find "youtube-dl")
(add-to-list 'load-path "~/.emacs.d/submodule/youtube-dl-emacs/")
(require 'youtube-dl)
(defun youtube-dl-song (url)
(interactive
(list (read-from-minibuffer
"URL: " (or (thing-at-point 'url)
(when interprogram-paste-function
(funcall interprogram-paste-function))))))
(async-shell-command (format "youtube-dl -x -f \"bestaudio[ext=m4a]\" \"%s\"; tageditor -s album=\"youtube-dl\" -f *.m4a" url))))
#+END_SRC

View file

@ -99,7 +99,12 @@
user-emacs-directory)))
(when my-ec/enable-exwm
(require 'exwm)))
(require 'exwm))
;; Ideally as a last step, load all things in submodule directory
(org-babel-load-file
(expand-file-name "config-submodules.org"
user-emacs-directory)))
(setq my/finished t)
;; Testing pull from windows