; * lisp/wid-browse.el (widget-browse): Delete commented out code.

This has been commented out since 1997.

diff --git a/lisp/wid-browse.el b/lisp/wid-browse.el
index e71e8cd49354965a4266412065ecfd78682a8b62..7fc476e5dfdf9d6162213a6c23ca0574814644f8 100644 (file)
--- a/lisp/wid-browse.el
+++ b/lisp/wid-browse.el
@@ -1,6 +1,6 @@
 ;;; wid-browse.el --- functions for browsing widgets  -*- lexical-binding: t -*-
 
-;; Copyright (C) 1997, 2001-2022 Free Software Foundation, Inc.
+;; Copyright (C) 1997-2022 Free Software Foundation, Inc.
 
 ;; Author: Per Abrahamsen <abraham@dina.kvl.dk>
 ;; Keywords: extensions
@@ -118,13 +118,6 @@ The following commands are available:
     (switch-to-buffer (get-buffer-create "*Browse Widget*")))
   (widget-browse-mode)
 
-  ;; Quick way to get out.
-;;  (widget-create 'push-button
-;;              :action (lambda (widget &optional event)
-;;                        (bury-buffer))
-;;              "Quit")
-;;  (widget-insert "\n")
-
   ;; Top text indicating whether it is a class or object browser.
   (if (listp widget)
       (widget-insert "Widget object browser.\n\nClass: ")