c7254e7bdc
+ 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.
37 lines
1.3 KiB
EmacsLisp
37 lines
1.3 KiB
EmacsLisp
;;; app/twitter/config.el -*- lexical-binding: t; -*-
|
|
|
|
(def-package! twittering-mode
|
|
:commands twit
|
|
:config
|
|
(setq twittering-use-master-password t
|
|
twittering-icon-mode nil
|
|
;; twittering-use-icon-storage t
|
|
;; twittering-icon-storage-file (concat doom-cache-dir "twittering-mode-icons.gz")
|
|
;; twittering-convert-fix-size 12
|
|
twittering-timeline-header ""
|
|
twittering-timeline-footer ""
|
|
twittering-edit-skeleton 'inherit-any
|
|
twittering-status-format
|
|
"%RT{%FACE[bold]{RT }}%S (%FACE[bold]{@%s}), %@%r%R:\n%FOLD[ ]{%t %QT{\n+----\n%FOLD[|]{ %S (@%s), %@:\n%FOLD[ ]{%t}}\n+----}}\n "
|
|
twittering-initial-timeline-spec-string
|
|
'(":home" ":mentions" ":direct_messages"))
|
|
|
|
(set! :popup "*twittering-edit*" :size 12 :select t)
|
|
|
|
(add-hook! twittering-mode
|
|
(setq header-line-format (or (doom-modeline 'twitter) mode-line-format)
|
|
mode-line-format nil))
|
|
|
|
(map! :map twittering-mode-map
|
|
[remap twittering-kill-buffer] #'+twitter/quit
|
|
"Q" #'+twitter/quit-all
|
|
"o" #'ace-link-addr
|
|
"j" #'evil-next-visual-line
|
|
"k" #'evil-previous-visual-line
|
|
"J" #'twittering-goto-next-status
|
|
"K" #'twittering-goto-previous-status)
|
|
|
|
(def-modeline! twitter
|
|
(bar matches " %b " selection-info)
|
|
()))
|