# HG changeset patch # User Oleksandr Gavenko # Date 1473596785 -10800 # Node ID c78504ea530fc411fcdb2717736361bd8e945ac5 # Parent 8380f91bc913527e20e569af50fcb9c7d4c577fb Fix: Warning: reference to free variable `gnus-tmp-group'. diff -r 8380f91bc913 -r c78504ea530f .emacs-my --- a/.emacs-my Sun Sep 11 15:06:41 2016 +0300 +++ b/.emacs-my Sun Sep 11 15:26:25 2016 +0300 @@ -1994,12 +1994,12 @@ ;; Remember when I visit group last time. (add-hook 'gnus-select-group-hook 'gnus-group-set-timestamp) +(defvar gnus-tmp-group) (defun gnus-user-format-function-d (header) (let ((time (gnus-group-timestamp gnus-tmp-group))) (if (and time (time-less-p (time-subtract (current-time) time) (seconds-to-time (* 3600 24 7 30 2)))) (format-time-string "%Y-%m-%d %H:%M" time) ""))) - ;; %d (or with user defined format %ud) shown when I visit group last time in ;; %*Group* buffer. (setq gnus-group-line-format "%M%S%p%P%6y:%B%(%-50,50G%)%3O %ud\n")