Mercurial > hg > xemacs-beta

comparison lisp/toolbar-items.el @ 5384:3889ef128488

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix misspelled words, and some grammar, across the entire source tree. See xemacs-patches message with ID <AANLkTi=edkEKtK3pZ60ytsG5pTJQy2TjAEVCZCLOa-oA@mail.gmail.com>.
author Jerry James <james@xemacs.org>
date Thu, 24 Mar 2011 11:00:11 -0600
parents 79940b592197
children 4dee0387b9de
comparison
equal deleted inserted replaced
5383:294ab9180fad 5384:3889ef128488
401 "Run News." 401 "Run News."
402 (interactive) 402 (interactive)
403 (let ((command (cdr-safe 403 (let ((command (cdr-safe
404 (assq toolbar-news-reader toolbar-news-commands-alist)))) 404 (assq toolbar-news-reader toolbar-news-commands-alist))))
405 (or command 405 (or command
406 (error "Unkown news reader %s" toolbar-news-reader)) 406 (error "Unknown news reader %s" toolbar-news-reader))
407 (if (symbolp command) 407 (if (symbolp command)
408 (call-interactively command) 408 (call-interactively command)
409 (eval command)))) 409 (eval command))))
410 410
411 (defvar toolbar-last-win-icon nil "A `last-win' icon set.") 411 (defvar toolbar-last-win-icon nil "A `last-win' icon set.")