diff options
| author | Case Duckworth | 2021-08-07 15:05:16 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-08-07 15:05:16 -0500 |
| commit | 4f72e23f72f9712999b8f629a4c62d6f78b65d3b (patch) | |
| tree | b16f2f0ba924a34663860a632f665598e13b8572 /lisp | |
| parent | Add alias for erc-propertize -> propertize (diff) | |
| download | emacs-4f72e23f72f9712999b8f629a4c62d6f78b65d3b.tar.gz emacs-4f72e23f72f9712999b8f629a4c62d6f78b65d3b.zip | |
Add twitter.com URL handling
TODO: This could be smarter, e.g. not going to nitter if twitter.com/t.co is part of the URL query.
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? |