Implement new formats: framelist & lyrics.

* scheme/format.scm: Set actual format script name as argv[0]
* src/cmdline.opt <format>: Use `stop' to stop
argument processing.
* src/getopt.m4 (GETOPT): New local variable `stop'.

* scheme/idest/format/framelist.scm: New file.
* scheme/idest/format/lyrics.scm: New file.

1 files changed, 3 insertions, 3 deletions

diff --git a/src/getopt.m4 b/src/getopt.m4
index 54ef9c1..19ee33c 100644
--- a/src/getopt.m4
+++ b/src/getopt.m4
@@ -200,10 +200,10 @@ dnl
 define([<GETOPT>],[<
  {
   int c;
-
+  int stop = 0;
 ifelse([<$#>],3,opterr = 0;)
-  while ((c = getopt_long($1, $2, SHORT_OPTS,
-                          long_options, NULL)) != EOF)
+  while (!stop && (c = getopt_long($1, $2, SHORT_OPTS,
+                                   long_options, NULL)) != EOF)
     {
       switch (c)
         {