* lisp/registry.el (registry-prune): Compare current size to max-size,
not post-prune target size.
+2015-03-19 Eric Abrahamsen <eric@ericabrahamsen.net>
+
+ * registry.el (registry-prune): Allow registry to reach full size
+ before pruning.
+
2015-03-19 Eric Abrahamsen <eric@ericabrahamsen.net>
* registry.el (registry-collect-prune-candidates): Fix call to
2015-03-19 Eric Abrahamsen <eric@ericabrahamsen.net>
* registry.el (registry-collect-prune-candidates): Fix call to
(* (oref db :max-size)
(oref db :prune-factor))))
candidates)
(* (oref db :max-size)
(oref db :prune-factor))))
candidates)
- (if (> size target-size)
+ (if (> size (oref db :max-size))
(progn
(setq candidates
(registry-collect-prune-candidates
(progn
(setq candidates
(registry-collect-prune-candidates