Re: how to use wml_auxiliareise (htmlinfo, etc)?

["Ralf S. Engelschall" <nospam@thanx>]

On Mon, Jan 25, 1999, Viorel Anghel wrote:

> How can i use auxiliaries like htmlinfo, weblint, linklint from wml package?
> 
> I tried (unsuccesfull) something like
> wmk -X htmlinfo file.wml
> 
> Something wrong with my wml distribution or what?

Ops, no: the wmk is broken at this point. Seems
like I've forgotten to do the expansion for -X in wmk.
For -E in wml it's done. But as a workaround you
can use `wmk -X /absolute/path/to/htmlinfo file.wml', of course.

Denis: I've no time to test it, but I propose the appended
patch for wml and wmk to fix and cleanup this stuff.

                                       Ralf S. Engelschall
                                       rse@engelschall.com
                                       www.engelschall.com
Index: wml.src
===================================================================
RCS file: /e/wml/cvs/wml/wml_frontend/wml.src,v
retrieving revision 1.4
diff -u -r1.4 wml.src
--- wml.src	1999/01/18 10:53:52	1.4
+++ wml.src	1999/01/25 13:05:13
@@ -1148,9 +1148,6 @@
                 $e = "@libdir@/exec/wml_aux_linklint$1";
                 $e .= " -nocache -one -summary" if ($1 eq '');
             }
-            elsif ($e =~ m|^tdist(.*)|) {
-                $e = "@libdir@/exec/wml_aux_tdist$1";
-            }
             &verbose(2, "EPILOG: $e $o\n");
             system("$e $o");
         }
Index: wmk.src
===================================================================
RCS file: /e/wml/cvs/wml/wml_frontend/wmk.src,v
retrieving revision 1.2
diff -u -r1.2 wmk.src
--- wmk.src	1999/01/12 14:24:30	1.2
+++ wmk.src	1999/01/25 13:05:21
@@ -271,7 +271,16 @@
                         &process_file("$dir/$file", $dir, $file);
                     }
                     foreach $exec (@opt_X_CUR) {
-                        $exec =~ s|^tdist|@libdir@/exec/wml_aux_tdist|;
+                        if ($exec =~ m|^htmlinfo(.*)|) {
+                            $exec = "@libdir@/exec/wml_aux_htmlinfo$1";
+                        }
+                        elsif ($exec =~ m|^weblint(.*)|) {
+                            $exec = "@libdir@/exec/wml_aux_weblint$1";
+                        }
+                        elsif ($exec =~ m|^linklint(.*)|) {
+                            $exec = "@libdir@/exec/wml_aux_linklint$1";
+                            $exec .= " -nocache -one -summary" if ($1 eq '');
+                        }
                         system($exec);
                     }
                 }
______________________________________________________________________
Website META Language (WML)                www.engelschall.com/sw/wml/
Official Support Mailing List                   sw-wml@engelschall.com
Automated List Manager                       majordomo@engelschall.com