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? |