diff options
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/acdw.el | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/lisp/acdw.el b/lisp/acdw.el index 9d8c489..be12dd6 100644 --- a/lisp/acdw.el +++ b/lisp/acdw.el | |||
@@ -497,6 +497,15 @@ Then, build `browse-url-button-regexp' with the new protocol." | |||
497 | (add-to-list 'acdw/button-protocols proto) | 497 | (add-to-list 'acdw/button-protocols proto) |
498 | (setq-default browse-url-button-regexp (acdw/build-button-url-regexp))) | 498 | (setq-default browse-url-button-regexp (acdw/build-button-url-regexp))) |
499 | 499 | ||
500 | ;;; Browse-URL tweaks | ||
501 | |||
502 | ;; convert twitter.com to nitter | ||
503 | (defun acdw/eww-browse-twitter-url (url &rest args) | ||
504 | "Browse a Twitter.com URL using Nitter." | ||
505 | (let* ((nitter "nitter.snopyta.org") | ||
506 | (url (replace-regexp-in-string "twitter\\.com" nitter url))) | ||
507 | (eww-browse-url url args))) | ||
508 | |||
500 | 509 | ||
501 | ;;; Recentf renaming with dired | 510 | ;;; Recentf renaming with dired |
502 | ;; from ... somewhere. 'rjs', apparently? | 511 | ;; from ... somewhere. 'rjs', apparently? |