Mercurial > hg > xemacs-beta

comparison lisp/toolbar-items.el @ 5474:4dee0387b9de

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merged with trunk.
author Mats Lidell <matsl@xemacs.org>
date Tue, 29 Mar 2011 00:02:47 +0200
parents 308d34e9f07d 3889ef128488
children bcd74c477a38
comparison
equal deleted inserted replaced
5473:ac37a5f7e5be 5474:4dee0387b9de
399 "Run News." 399 "Run News."
400 (interactive) 400 (interactive)
401 (let ((command (cdr-safe 401 (let ((command (cdr-safe
402 (assq toolbar-news-reader toolbar-news-commands-alist)))) 402 (assq toolbar-news-reader toolbar-news-commands-alist))))
403 (or command 403 (or command
404 (error "Unkown news reader %s" toolbar-news-reader)) 404 (error "Unknown news reader %s" toolbar-news-reader))
405 (if (symbolp command) 405 (if (symbolp command)
406 (call-interactively command) 406 (call-interactively command)
407 (eval command)))) 407 (eval command))))
408 408
409 (defvar toolbar-last-win-icon nil "A `last-win' icon set.") 409 (defvar toolbar-last-win-icon nil "A `last-win' icon set.")