Mercurial > hg > xemacs-beta

comparison lisp/gnus/gnus-sum.el @ 136:b980b6286996 r20-2b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-2b2
author cvs
date Mon, 13 Aug 2007 09:31:12 +0200
parents 9b50b4588a93
children 585fb297b004
comparison
equal deleted inserted replaced
135:4636a6841cd6 136:b980b6286996
4193 0 4193 0
4194 ;; Lines. 4194 ;; Lines.
4195 (progn 4195 (progn
4196 (goto-char p) 4196 (goto-char p)
4197 (if (search-forward "\nlines: " nil t) 4197 (if (search-forward "\nlines: " nil t)
4198 (if (numberp (setq lines (read cur))) 4198 (if (numberp (setq lines (ignore-errors (read cur))))
4199 lines 0) 4199 lines 0)
4200 0)) 4200 0))
4201 ;; Xref. 4201 ;; Xref.
4202 (progn 4202 (progn
4203 (goto-char p) 4203 (goto-char p)
8677 (map-y-or-n-p 8677 (map-y-or-n-p
8678 "Update summary buffer %s? " 8678 "Update summary buffer %s? "
8679 (lambda (buf) (switch-to-buffer buf) (gnus-summary-exit)) 8679 (lambda (buf) (switch-to-buffer buf) (gnus-summary-exit))
8680 buffers))))) 8680 buffers)))))
8681 8681
8682 (gnus-ems-redefine)
8683
8682 (provide 'gnus-sum) 8684 (provide 'gnus-sum)
8683 8685
8684 (run-hooks 'gnus-sum-load-hook) 8686 (run-hooks 'gnus-sum-load-hook)
8685 8687
8686 ;;; gnus-sum.el ends here 8688 ;;; gnus-sum.el ends here