[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#19105: eww-save-history: use a customizable limit (eww-history-limit
From: |
Ivan Shmakov |
Subject: |
bug#19105: eww-save-history: use a customizable limit (eww-history-limit) |
Date: |
Wed, 19 Nov 2014 11:45:37 +0000 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.3 (gnu/linux) |
Package: emacs
Severity: wishlist
The limit on the number of eww-history entries enforced by
eww-save-history is currently hard-coded. Instead, it should be
customizable, with an option not to enforce any limit at all.
Please thus consider the patch MIMEd.
--
FSF associate member #7257 http://boycottsystemd.org/ … 3013 B6A0 230E 334A
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -65,6 +65,12 @@
:group 'eww
:type 'string)
+(defcustom eww-history-limit 50
+ "Maximum number of entries to retain in the history."
+ :version "25.1"
+ :group 'eww
+ :type '(choice (const :tag "Unlimited" nil)
+ integer))
(defcustom eww-use-external-browser-for-content-type
"\\`\\(video/\\|audio/\\|application/ogg\\)"
"Always use external browser for specified content-type."
@@ -1452,7 +1511,8 @@ Differences in #targets are ignored."
(setq eww-data (list :title ""))
;; Don't let the history grow infinitely. We store quite a lot of
;; data per page.
- (when-let (tail (nthcdr 50 eww-history))
+ (when-let (tail (and eww-history-limit
+ (nthcdr eww-history-limit eww-history)))
(setcdr tail nil)))
(defun eww-list-histories ()
- bug#19105: eww-save-history: use a customizable limit (eww-history-limit),
Ivan Shmakov <=