From ba8cb52d565124031fb5e28222a4ec2c29abce3a Mon Sep 17 00:00:00 2001 From: Dave Love Date: Tue, 18 Jul 2000 12:52:25 +0000 Subject: [PATCH] (custom-variable-reset-saved, custom-variable-reset-standard): Remove unused bindings. --- lisp/cus-edit.el | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index 0c5588ac8f4..ae4277ea098 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el @@ -2423,7 +2423,6 @@ Optional EVENT is the location for the menu." "Restore the saved value for the variable being edited by WIDGET." (let* ((symbol (widget-value widget)) (set (or (get symbol 'custom-set) 'set-default)) - (comment-widget (widget-get widget :comment-widget)) (value (get symbol 'saved-value)) (comment (get symbol 'saved-variable-comment))) (cond ((or value comment) @@ -2444,8 +2443,7 @@ Optional EVENT is the location for the menu." This operation eliminates any saved setting for the variable, restoring it to the state of a variable that has never been customized." (let* ((symbol (widget-value widget)) - (set (or (get symbol 'custom-set) 'set-default)) - (comment-widget (widget-get widget :comment-widget))) + (set (or (get symbol 'custom-set) 'set-default))) (if (get symbol 'standard-value) (funcall set symbol (eval (car (get symbol 'standard-value)))) (error "No standard setting known for %S" symbol)) -- 2.39.2