mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-22 18:35:09 +00:00
; * lisp/wid-browse.el (widget-browse): Delete commented out code.
This has been commented out since 1997.
This commit is contained in:
parent
4a4fcf628e
commit
eb4e66ee64
@ -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: ")
|
||||
|
Loading…
Reference in New Issue
Block a user