doomemacs/modules/feature/eval/config.el

;;; feature/eval/config.el -*- lexical-binding: t; -*-

;; remove ellipsis when printing sexps in message buffer
(setq eval-expression-print-length nil
      eval-expression-print-level  nil)


;;
;; Plugin(s)
;;

(def-package! quickrun
  :defer t
  :init
  (unless (boundp 'display-line-numbers)
    (add-hook 'quickrun--mode-hook #'nlinum-mode))
  :config
  (setq quickrun-focus-p nil)

  (set-popup-rule! "^\\*quickrun" '((size . 0.3)) '((transient . 0)))

  (defun +eval*quickrun-auto-close (&rest _)
    "Allows us to silently re-run quickrun from within the quickrun buffer."
    (when-let* ((win (get-buffer-window quickrun--buffer-name)))
      (let ((inhibit-message t))
        (quickrun--kill-running-process)
        (message ""))
      (delete-window win)))
  (advice-add #'quickrun :before #'+eval*quickrun-auto-close)
  (advice-add #'quickrun-region :before #'+eval*quickrun-auto-close)

  (defun +eval|quickrun-scroll-to-bof ()
    "Ensures window is scrolled to BOF on invocation."
    (with-selected-window (get-buffer-window quickrun--buffer-name)
      (goto-char (point-min))
      (let ((ignore-window-parameters t))
        (shrink-window-if-larger-than-buffer))))
  (add-hook 'quickrun-after-run-hook #'+eval|quickrun-scroll-to-bof))
Major optimization refactor, across the board + enable lexical-scope everywhere (lexical-binding = t): ~5-10% faster startup; ~5-20% general boost + reduce consing, function calls & garbage collection by preferring cl-loop & dolist over lambda closures (for mapc[ar], add-hook, and various cl-lib filter/map/reduce functions) -- where possible + prefer functions with dedicated opcodes, like assq (see byte-defop's in bytecomp.el for more) + prefer pcase & cond (faster) over cl-case + general refactor for code readability + ensure naming & style conventions are adhered to + appease byte-compiler by marking unused variables with underscore + defer minor mode activation to after-init, emacs-startup or window-setup hooks; a customization opportunity for users + ensures custom functionality won't interfere with startup. 2017-06-08 11:47:56 +02:00			`;;; feature/eval/config.el -- lexical-binding: t; --`
Add modules/feature/eval (WIP) 2017-02-13 16:57:08 -05:00
feature/eval: rewrite module 2017-03-04 18:28:51 -05:00			`;; remove ellipsis when printing sexps in message buffer`
			`(setq eval-expression-print-length nil`
			`eval-expression-print-level nil)`
Add modules/feature/eval (WIP) 2017-02-13 16:57:08 -05:00
feature/eval: :eval now accepts functions (refactor emacs-lisp eval fn) 2017-05-07 02:27:54 +02:00
feature/eval: reorganize; move settings into init.el 2018-05-14 01:22:33 +02:00			`;;`
			`;; Plugin(s)`
			`;;`
Add modules/feature/eval (WIP) 2017-02-13 16:57:08 -05:00
Revert macros to ...! name convention (elisp doesn't like @...) 2017-02-23 00:06:12 -05:00			`(def-package! quickrun`
Major refactor & optimization of how modules load their packages Now that we are loading package autoloads files (as part of the generated doom-package-autoload-file when running make autoloads), many :commands properties are redundant. In fact, many def-package! blocks are redundant. In some cases, we can do without a config.el file entirely, and can move into the autoloads file or rely entirely on package autoloads. Also, many settings have been moved in their module's autoloads files, which makes them available ASAP; their use no longer depends on module load order. This gained me a modest ~10% boost in startup speed. 2018-05-25 00:46:11 +02:00			`:defer t`
General cleanup + refactor 2017-02-28 12:12:09 -05:00			`:init`
Don't use nlinum-mode for quickrun buffers in emacs 26+ 2017-09-24 17:10:07 +02:00			`(unless (boundp 'display-line-numbers)`
			`(add-hook 'quickrun--mode-hook #'nlinum-mode))`
Add modules/feature/eval (WIP) 2017-02-13 16:57:08 -05:00			`:config`
feature/eval: improve compatibility with feature/popups This makes quickrun, doom eval and Pp Eval Output buffers behave better. Eval output buffers should a) shrink themselves to the size of their output (within reason), b) not grab focus, and c) be easy to close from afar with C-g/Escape. Gotchas: 1. Quickrun gets output asynchronously, so we shrink it on quickrun-after-run-hook, not in the popup rule. 2. doom eval and Pp Eval Output opens with its output ready, so the popup system may shrink those to fit. 3. doom eval and Pp Eval Output handle window selection themselves. Let them by setting the select window parameter to #'ignore. 2018-01-08 16:18:16 -05:00			`(setq quickrun-focus-p nil)`

Introduce autodefs to replace some settings + :popup -> set-popup-rule! + :popups -> set-popup-rules! + :company-backend -> set-company-backend! + :evil-state -> set-evil-initial-state! I am slowly phasing out the setting system (def-setting! and set!), starting with these. What are autodefs? These are functions that are always defined, whether or not their respective modules are enabled. However, when their modules are disabled, they are replaced with macros that no-op and don't waste time evaluating their arguments. The old set! function will still work, for a while. 2018-06-15 02:58:12 +02:00			`(set-popup-rule! "^\\*quickrun" '((size . 0.3)) '((transient . 0)))`
Add modules/feature/eval (WIP) 2017-02-13 16:57:08 -05:00
feature/eval: rewrite module 2017-03-04 18:28:51 -05:00			`(defun +eval*quickrun-auto-close (&rest _)`
General cleanup + refactor 2017-02-28 12:12:09 -05:00			`"Allows us to silently re-run quickrun from within the quickrun buffer."`
Fix obsolete (when\|if)-let messages in Emacs 26 2017-12-10 14:49:52 -05:00			`(when-let* ((win (get-buffer-window quickrun--buffer-name)))`
feature/eval: rewrite module 2017-03-04 18:28:51 -05:00			`(let ((inhibit-message t))`
			`(quickrun--kill-running-process)`
Add modules/feature/eval (WIP) 2017-02-13 16:57:08 -05:00			`(message ""))`
feature/eval: rewrite module 2017-03-04 18:28:51 -05:00			`(delete-window win)))`
PRAISE BE TO THE BYTE COMPILER FOR THY SHARP QUOTES 2017-04-17 02:17:10 -04:00			`(advice-add #'quickrun :before #'+eval*quickrun-auto-close)`
			`(advice-add #'quickrun-region :before #'+eval*quickrun-auto-close)`
Add modules/feature/eval (WIP) 2017-02-13 16:57:08 -05:00
feature/eval: rewrite module 2017-03-04 18:28:51 -05:00			`(defun +eval\|quickrun-scroll-to-bof ()`
General cleanup + refactor 2017-02-28 12:12:09 -05:00			`"Ensures window is scrolled to BOF on invocation."`
feature/eval: rewrite module 2017-03-04 18:28:51 -05:00			`(with-selected-window (get-buffer-window quickrun--buffer-name)`
Fix quickrun output popups being too small There is no guarantee that the quickrun buffer will have all its output when spawned, making :autofit unpredictable; usually making them too small, so we disable :autofit and do it manually, once the output is ready. 2017-10-03 15:46:38 +02:00			`(goto-char (point-min))`
Remove/replace references to doom-popup-buffer 2018-01-06 03:27:23 -05:00			`(let ((ignore-window-parameters t))`
			`(shrink-window-if-larger-than-buffer))))`
PRAISE BE TO THE BYTE COMPILER FOR THY SHARP QUOTES 2017-04-17 02:17:10 -04:00			`(add-hook 'quickrun-after-run-hook #'+eval\|quickrun-scroll-to-bof))`
Add modules/feature/eval (WIP) 2017-02-13 16:57:08 -05:00