X-Git-Url: https://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fgnus-cus.el;h=2f99abba22c619052d15718882be080f91451bea;hb=c85ff27626350a909ee39474fecac012fec8cd26;hp=80cf156df7ac53bf1b1d1542f537bafb8c351340;hpb=e2c9efb05a1ae9e65fd40bab80466da331f3981b;p=gnus diff --git a/lisp/gnus-cus.el b/lisp/gnus-cus.el index 80cf156df..2f99abba2 100644 --- a/lisp/gnus-cus.el +++ b/lisp/gnus-cus.el @@ -1,7 +1,6 @@ ;;; gnus-cus.el --- customization commands for Gnus -;; Copyright (C) 1996, 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc. +;; Copyright (C) 1996, 1999-2011 Free Software Foundation, Inc. ;; Author: Per Abrahamsen ;; Keywords: news @@ -50,7 +49,7 @@ if that value is non-nil." (setq major-mode 'gnus-custom-mode mode-name "Gnus Customize") (use-local-map widget-keymap) - ;; Emacs 21 stuff: + ;; Emacs stuff: (when (and (facep 'custom-button-face) (facep 'custom-button-pressed-face)) (set (make-local-variable 'widget-button-face) @@ -865,11 +864,6 @@ This can be changed using the `\\[gnus-score-change-score-file]' command." Check the [ ] for the entries you want to apply to this score file, then edit the value to suit your taste. Don't forget to mark the checkbox, if you do all your changes will be lost. ") - (widget-create 'push-button - :action (lambda (&rest ignore) - (require 'gnus-audio) - (gnus-audio-play "Evil_Laugh.au")) - "Bhahahah!") (widget-insert "\n\n") (make-local-variable 'gnus-custom-scores) (setq gnus-custom-scores @@ -1118,5 +1112,4 @@ articles in the thread. (provide 'gnus-cus) -;; arch-tag: a37c285a-49bc-4235-8244-804536effeaf ;;; gnus-cus.el ends here