diff options
| author | Eli Zaretskii | 2019-02-08 09:53:32 +0200 |
|---|---|---|
| committer | Eli Zaretskii | 2019-02-08 09:53:32 +0200 |
| commit | 24905e92179c2ee8cd02c26b4a7058fbd238ece7 (patch) | |
| tree | 3b894962e3be56f2b8791807166f9822ccadccfc | |
| parent | 51e6e0694acb6ecb54962d702193ec5b21e57128 (diff) | |
| download | emacs-24905e92179c2ee8cd02c26b4a7058fbd238ece7.tar.gz emacs-24905e92179c2ee8cd02c26b4a7058fbd238ece7.zip | |
Minor fixes for last change
* etc/NEWS: Announce the change in EWW download behavior.
* lisp/net/eww.el (eww-download): Doc fix. (Bug#34291)
| -rw-r--r-- | etc/NEWS | 5 | ||||
| -rw-r--r-- | lisp/net/eww.el | 2 |
2 files changed, 6 insertions, 1 deletions
| @@ -654,6 +654,11 @@ and its value has been changed to Duck Duck Go. | |||
| 654 | 654 | ||
| 655 | ** eww/shr | 655 | ** eww/shr |
| 656 | 656 | ||
| 657 | +++ | ||
| 658 | *** The 'd' ('eww-download') command now falls back to current page's URL. | ||
| 659 | If this command is invoked with no URL at point, it now downloads the | ||
| 660 | current page instead of signaling an error. | ||
| 661 | |||
| 657 | *** When opening external links in eww/shr (typically with the | 662 | *** When opening external links in eww/shr (typically with the |
| 658 | 'C-u RET' keystroke on a link), the link will be flashed with the new | 663 | 'C-u RET' keystroke on a link), the link will be flashed with the new |
| 659 | 'shr-selected-link' face to give the user feedback that the command | 664 | 'shr-selected-link' face to give the user feedback that the command |
diff --git a/lisp/net/eww.el b/lisp/net/eww.el index 0c8bffa579b..a3f22aeb8a0 100644 --- a/lisp/net/eww.el +++ b/lisp/net/eww.el | |||
| @@ -1532,7 +1532,7 @@ Differences in #targets are ignored." | |||
| 1532 | 1532 | ||
| 1533 | (defun eww-download () | 1533 | (defun eww-download () |
| 1534 | "Download URL to `eww-download-directory'. | 1534 | "Download URL to `eww-download-directory'. |
| 1535 | Use link under point if there is one, else the current page URL." | 1535 | Use link at point if there is one, else the current page's URL." |
| 1536 | (interactive) | 1536 | (interactive) |
| 1537 | (access-file eww-download-directory "Download failed") | 1537 | (access-file eww-download-directory "Download failed") |
| 1538 | (let ((url (or (get-text-property (point) 'shr-url) | 1538 | (let ((url (or (get-text-property (point) 'shr-url) |