diff options
| author | Lars Magne Ingebrigtsen <larsi@gnus.org> | 2013-06-26 15:07:24 +0200 |
|---|---|---|
| committer | Lars Magne Ingebrigtsen <larsi@gnus.org> | 2013-06-26 15:07:24 +0200 |
| commit | 23a75d7f5957aef1b8bbbf07672596d0535a7c27 (patch) | |
| tree | 6173e3c97edfb47cc3c1bf3a0c82c331e9b3e6f7 /lisp/net | |
| parent | 843571cba9e46385c1e46a6d78e2838edde4c564 (diff) | |
| download | emacs-23a75d7f5957aef1b8bbbf07672596d0535a7c27.tar.gz emacs-23a75d7f5957aef1b8bbbf07672596d0535a7c27.tar.bz2 emacs-23a75d7f5957aef1b8bbbf07672596d0535a7c27.zip | |
(eww-mode-map): Add a menu bar.
Diffstat (limited to 'lisp/net')
| -rw-r--r-- | lisp/net/eww.el | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/lisp/net/eww.el b/lisp/net/eww.el index 5ad4c327627..d56031a6f34 100644 --- a/lisp/net/eww.el +++ b/lisp/net/eww.el @@ -335,6 +335,20 @@ word(s) will be searched for via `eww-search-prefix'." (define-key map "&" 'eww-browse-with-external-browser) (define-key map "d" 'eww-download) (define-key map "w" 'eww-copy-page-url) + (define-key map "C" 'url-cookie-list) + + (easy-menu-define nil map "" + '("eww" + ["Quit" eww-quit t] + ["Reload" eww-reload t] + ["Back to previous page" eww-back-url + :active (not (zerop (length eww-history)))] + ["Forward to next page" eww-forward-url + :active (not (zerop eww-history-position))] + ["Browse with external browser" eww-browse-with-external-browser t] + ["Download" eww-download t] + ["Copy page URL" eww-copy-page-url t] + ["List cookies" url-cookie-list t])) map)) (define-derived-mode eww-mode nil "eww" |