diff options
-rw-r--r-- | init.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/init.el b/init.el index 70d72b4..e7f08d5 100644 --- a/init.el +++ b/init.el | |||
@@ -271,6 +271,7 @@ AKA, DO NOT USE THIS FUNCTION!!!" | |||
271 | (defun circe-command-SHORTEN (url) | 271 | (defun circe-command-SHORTEN (url) |
272 | "Shorten URL using `0x0-shorten-uri'." | 272 | "Shorten URL using `0x0-shorten-uri'." |
273 | (interactive "sURL to shorten: ") | 273 | (interactive "sURL to shorten: ") |
274 | ;; TODO: enable /shorten URL comment syntax | ||
274 | (let ((short-url (0x0-shorten-uri (0x0--choose-server) url))) | 275 | (let ((short-url (0x0-shorten-uri (0x0--choose-server) url))) |
275 | (circe-command-SAY short-url))) | 276 | (circe-command-SAY short-url))) |
276 | 277 | ||
@@ -386,6 +387,7 @@ AKA, DO NOT USE THIS FUNCTION!!!" | |||
386 | consult-project-root-function #'vc-root-dir | 387 | consult-project-root-function #'vc-root-dir |
387 | completion-in-region-function #'acdw-consult/complete-in-region | 388 | completion-in-region-function #'acdw-consult/complete-in-region |
388 | completion-cycle-threshold 3 | 389 | completion-cycle-threshold 3 |
390 | consult-preview-key (kbd "M-.") | ||
389 | tab-always-indent 'complete) | 391 | tab-always-indent 'complete) |
390 | 392 | ||
391 | (:advise register-preview :override #'consult-register-window) | 393 | (:advise register-preview :override #'consult-register-window) |
@@ -467,8 +469,8 @@ AKA, DO NOT USE THIS FUNCTION!!!" | |||
467 | (:hook visual-line-mode)) | 469 | (:hook visual-line-mode)) |
468 | 470 | ||
469 | (setup (:straight-if (define-repeat-map | 471 | (setup (:straight-if (define-repeat-map |
470 | :host nil | 472 | :host nil |
471 | :repo "https://tildegit.org/acdw/define-repeat-map.el") | 473 | :repo "https://tildegit.org/acdw/define-repeat-map.el") |
472 | (acdw/system :home)) | 474 | (acdw/system :home)) |
473 | 475 | ||
474 | (defun acdw/other-window-or-switch-buffer-backward () | 476 | (defun acdw/other-window-or-switch-buffer-backward () |