[Firebird-checkins] CVS: interbase/isql isql.e,1.20,1.21

[Claudio V. C. <ro...@us...>]

Build Number:589

Update of /cvsroot/firebird/interbase/isql
In directory usw-pr-cvs1:/tmp/cvs-serv20209

Modified Files:
	isql.e 
Log Message:
If isql accepts -nowarnings as a command-line argument and SET shows
the state of the warnings display, it seems natural to add
SET WNG or SET WARNINGS to toggle that flag. No other code change
as been done as the logic to suppress or show warnings is already in place.


Index: isql.e
===================================================================
RCS file: /cvsroot/firebird/interbase/isql/isql.e,v
retrieving revision 1.20
retrieving revision 1.21
diff -U3 -r1.20 -r1.21
--- isql.e	2001/10/27 22:30:57	1.20
+++ isql.e	2001/11/21 02:56:54	1.21
@@ -4412,6 +4412,10 @@
 	else
 	    ret = ERR;
 	}
+    else if (!strcmp (parms [1], "WARNINGS") || !strcmp (parms [1], "WNG"))
+	{
+	ret = do_set_command (parms[2], &Warnings);
+	}
     else if (!strcmp (parms [1], "GENERATOR"))
 	ret = CONT;
     else if (!strcmp (parms [1], "STATISTICS"))