diff options
Diffstat (limited to 'init.el')
-rw-r--r-- | init.el | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/init.el b/init.el index 280f7e6..c06e44d 100644 --- a/init.el +++ b/init.el | |||
@@ -186,7 +186,7 @@ | |||
186 | (seq "." (or "mp4" "gif" "mov" "MOV" "webm") eos) | 186 | (seq "." (or "mp4" "gif" "mov" "MOV" "webm") eos) |
187 | ;; music | 187 | ;; music |
188 | "soundcloud.com" "bandcamp.com" | 188 | "soundcloud.com" "bandcamp.com" |
189 | (seq "." (or "ogg" "mp3") eos))) | 189 | (seq "." (or "ogg" "mp3" "opus" "m4a") eos))) |
190 | (lambda (&rest args) | 190 | (lambda (&rest args) |
191 | (apply (if (executable-find "mpv") | 191 | (apply (if (executable-find "mpv") |
192 | #'+browse-url-with-mpv | 192 | #'+browse-url-with-mpv |
@@ -302,7 +302,10 @@ | |||
302 | eshell-scroll-to-bottom-on-input 'all | 302 | eshell-scroll-to-bottom-on-input 'all |
303 | eshell-smart-space-goes-to-end t | 303 | eshell-smart-space-goes-to-end t |
304 | eshell-where-to-jump 'begin | 304 | eshell-where-to-jump 'begin |
305 | eshell-banner-message "") | 305 | eshell-banner-message "" |
306 | eshell-prompt-regexp (rx bol (* (not (any ?# ?$ ?\n))) | ||
307 | " " (any ?# ?$) | ||
308 | (* " "))) | ||
306 | (with-eval-after-load 'mwim | 309 | (with-eval-after-load 'mwim |
307 | (setf (alist-get 'eshell-mode mwim-beginning-of-line-function) | 310 | (setf (alist-get 'eshell-mode mwim-beginning-of-line-function) |
308 | #'eshell-bol)) | 311 | #'eshell-bol)) |
@@ -318,7 +321,7 @@ | |||
318 | (concat eshell-prompt-regexp | 321 | (concat eshell-prompt-regexp |
319 | "\\(.*\\)") | 322 | "\\(.*\\)") |
320 | 1)) | 323 | 1)) |
321 | truncate-lines t)) | 324 | (cons 'truncate-lines t))) |
322 | (set (make-local-variable (car setting)) (cdr setting))) | 325 | (set (make-local-variable (car setting)) (cdr setting))) |
323 | ;; Bind keys | 326 | ;; Bind keys |
324 | (dolist (binding '(("C-d" . +eshell-quit-or-delete-char))) | 327 | (dolist (binding '(("C-d" . +eshell-quit-or-delete-char))) |
@@ -1442,8 +1445,8 @@ See also `crux-reopen-as-root-mode'." | |||
1442 | 1445 | ||
1443 | (setup (:straight macrostep) | 1446 | (setup (:straight macrostep) |
1444 | (:require macrostep) | 1447 | (:require macrostep) |
1445 | (:with-mode emacs-lisp-mode | 1448 | (:bind-into (emacs-lisp-mode lisp-interaction-mode) |
1446 | (:bind "C-c e" #'macrostep-expand))) | 1449 | "C-c e" #'macrostep-expand)) |
1447 | 1450 | ||
1448 | (setup (:straight (magit :host github :repo "magit/magit"))) | 1451 | (setup (:straight (magit :host github :repo "magit/magit"))) |
1449 | 1452 | ||