Reorganize core/*.el

This commit is contained in:
Henrik Lissner 2017-01-17 23:28:19 -05:00
parent 68b7203749
commit c1418ad76b
6 changed files with 15 additions and 101 deletions

View file

@ -1,6 +0,0 @@
;;; core-autoload.el
(provide 'core-autoload)
;;; core-autoload.el ends here

View file

@ -1,33 +0,0 @@
;;; core-dashboard.el
(setq initial-major-mode 'doom-mode
initial-scratch-message "\n Loading..."
inhibit-startup-screen t
;; shuts up emacs at startup
inhibit-startup-echo-area-message user-login-name)
(define-derived-mode doom-mode special-mode
(concat "v" doom-version)
"Major mode for DOOM buffers.")
(define-derived-mode doom-dashboard-mode doom-mode
(concat "v" doom-version)
"Major mode for DOOM buffers.")
(defvar doom-dashboard-buffer value
"")
(defvar doom-dashboard-buffer-name " *doom*"
"")
(defvar doom-dashboard--edited nil
"")
(defvar doom-dashboard-inhibit-reload nil
"")
(defvar doom-dashboard-mode-line-format (assq 'minimal doom-modeline-formats)
"")
(provide 'core-dashboard)
;;; core-dashboard.el ends here

View file

@ -1,41 +0,0 @@
;;; custom-debug.el --- debugging with `realgud'
(after! debug
;; For elisp debugging
(map! :map debugger-mode-map
:n "RET" 'debug-help-follow
:n "n" 'debugger-step-through
:n "c" 'debugger-continue))
(use-package realgud
:commands (realgud:gdb realgud:trepanjs realgud:bashdb realgud:zshdb)
:config
(map! :map realgud:shortkey-mode-map
:n "j" 'evil-next-line
:n "k" 'evil-previous-line
:n "h" 'evil-backward-char
:n "l" 'evil-forward-char
:m "n" 'realgud:cmd-next
:m "b" 'realgud:cmd-break
:m "B" 'realgud:cmd-clear
:n "c" 'realgud:cmd-continue)
;; Popup rules
(def-popup! "\\`\\*\\(g\\|zsh\\|bash\\)db.*?\\*\\'" :size 20 :regexp t)
(def-popup! "\\`\\*trepanjs.*?\\*\\'" :size 20 :regexp t)
;; Temporary Ex commands for the debugger
(def-tmp-excmd! doom:def-debug-on doom:def-debug-off
("n[ext]" . realgud:cmd-next)
("s[tep]" . realgud:cmd-step)
("b[reak]" . doom:debug-toggle-breakpoint)
("c[ontinue]" . realgud:cmd-continue))
;; TODO does this work with shackle?
(advice-add 'realgud-cmdbuf-init :after 'doom:def-debug-on)
(advice-add 'realgud:cmd-quit :after 'doom:def-debug-off)
;; Monkey-patch `realgud:run-process' to run in a popup.
(advice-add 'realgud:run-process :override 'doom*realgud:run-process))
(provide 'custom-debug)
;;; custom-debug.el ends here

View file

@ -1,6 +0,0 @@
;;; core-sessions.el
;; TODO
(provide 'core-sessions)
;;; core-sessions.el ends here

View file

@ -1,9 +1,13 @@
;;; core-settings.el --- centralized inter-package configuration ;;; core-set.el --- centralized inter-package configuration
(defvar doom-settings '() (defvar doom-settings '()
"docstring") "docstring")
(defun doom-define-setting (name &optional docs &rest args)) (defun doom-define-setting (name &optional docs &rest args)
(declare (indent defun)))
(defun doom-set (mode key value)
(declare (indent defun)))
(defmacro config! (package-name &rest args) (defmacro config! (package-name &rest args)
(declare (indent defun)) (declare (indent defun))
@ -15,8 +19,5 @@
(defmacro set! (&rest args)) (defmacro set! (&rest args))
(defun doom-set (mode key value) (provide 'core-set)
(declare (indent defun))) ;;; core-set.el ends here
(provide 'core-settings)
;;; core-settings.el ends here

View file

@ -149,22 +149,21 @@ enable multiple minor modes for the same regexp.")
(package! smex :commands smex) (package! smex :commands smex)
;;; Let 'er rip! (order matters!) ;;; Let 'er rip! (order matters!)
;; (require 'core-settings) ; configuration management system ;; (require 'core-set) ; configuration management system
;; (require 'core-popups) ; taming sudden yet inevitable windows ;; (require 'core-popups) ; taming sudden yet inevitable windows
(require 'core-evil) ; come to the dark side, we have cookies (require 'core-evil) ; come to the dark side, we have cookies
;; (require 'core-project) ;; (require 'core-project)
;; (require 'core-os) ;; (require 'core-os)
;; (require 'core-ui) ;; (require 'core-ui)
;; (require 'core-modeline) ;; (require 'core-modeline)
;; (require 'core-editor) ;; (require 'core-editor)
;; (require 'core-completion) ;; (require 'core-completion)
;; (require 'core-syntax-checking) ;; (require 'core-jump)
;; (require 'core-snippets)
;; (require 'core-repl) ;; (require 'core-repl)
;; (require 'core-sessions) ;; (require 'core-snippets)
;; (require 'core-workspaces) ;; (require 'core-syntax-checking)
;; (require 'core-vcs) ;; (require 'core-vcs)
;; (require 'core-dashboard) ;; (require 'core-workspaces)
(unless (require 'autoloads nil t) (unless (require 'autoloads nil t)
(doom/refresh-autoloads t))) (doom/refresh-autoloads t)))