X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fgnus-salt.el;h=760a7a0942ed39695469cbeb487c9f8a2c673fd1;hb=873ba7b51ddfb07246cd874b7de72662308236c9;hp=a72d594a386563a058f6c4c8a0fd4e5eb73a87cb;hpb=6c080e72dc8d6b98027b944c9a4e7e275b315a75;p=gnus diff --git a/lisp/gnus-salt.el b/lisp/gnus-salt.el index a72d594a3..760a7a094 100644 --- a/lisp/gnus-salt.el +++ b/lisp/gnus-salt.el @@ -1,7 +1,6 @@ ;;; gnus-salt.el --- alternate summary mode interfaces for Gnus -;; Copyright (C) 1996, 1997, 1998, 1999, 2001, 2002, 2003, 2004, 2005, -;; 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. +;; Copyright (C) 1996-1999, 2001-2012 Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen ;; Keywords: news @@ -537,12 +536,6 @@ Two predefined functions are available: (when pos (cons pos (next-single-property-change pos 'gnus-number))))) -(defun gnus-tree-goto-article (article) - (let ((pos (text-property-any - (point-min) (point-max) 'gnus-number article))) - (when pos - (goto-char pos)))) - (defun gnus-tree-recenter () "Center point in the tree window." (let ((selected (selected-window))