# HG changeset patch # User Richard M. Stallman # Date 1108449195 0 # Node ID 896e880eab56dacd5b5a7c1a73dbbd56968a7fe5 # Parent 5df201ceaa7bb20e109644c7114354a113672de4 (Fsetq_default): Allow no arg case. diff -r 5df201ceaa7b -r 896e880eab56 src/data.c --- a/src/data.c Mon Feb 14 23:44:07 2005 +0000 +++ b/src/data.c Tue Feb 15 06:33:15 2005 +0000 @@ -1458,7 +1458,7 @@ return value; } -DEFUN ("setq-default", Fsetq_default, Ssetq_default, 2, UNEVALLED, 0, +DEFUN ("setq-default", Fsetq_default, Ssetq_default, 0, UNEVALLED, 0, doc: /* Set the default value of variable VAR to VALUE. VAR, the variable name, is literal (not evaluated); VALUE is an expression: it is evaluated and its value returned. @@ -1470,7 +1470,7 @@ This sets each VAR's default value to the corresponding VALUE. The VALUE for the Nth VAR can refer to the new default values of previous VARs. -usage: (setq-default VAR VALUE [VAR VALUE...]) */) +usage: (setq-default [VAR VALUE...]) */) (args) Lisp_Object args; {