svn commit - mysqldoc@docsrva: r3411 - trunk/tools

[mcbrown]

Author: mcbrown
Date: 2006-09-21 17:05:32 +0200 (Thu, 21 Sep 2006)
New Revision: 3411

Log:
Adding help output to deep-check.pl
Fixing link type references in idremap.pl



Modified:
   trunk/tools/deep-check.pl
   trunk/tools/idremap.pl


Modified: trunk/tools/deep-check.pl
===================================================================
--- trunk/tools/deep-check.pl	2006-09-21 09:17:26 UTC (rev 3410)
+++ trunk/tools/deep-check.pl	2006-09-21 15:05:32 UTC (rev 3411)
Changed blocks: 1, Lines Added: 20, Lines Deleted: 1; 1058 bytes

@@ -22,13 +22,32 @@
 
 my ($checkwidth,
     $linelength,
-    $checkimages) = (0,72,0);
+    $checkimages,
+    $help) = (0,72,0,0);
 
 GetOptions("checkwidth" => \$checkwidth,
            "checkimages" => \$checkimages,
            "linelength=i" => \$linelength,
+           "help" => \$help,
            );
 
+if ($help)
+{
+    print <<EOF;
+deep-check.pl [--checkwidth] [--checkimages] [--linelength=#] file.xml
+
+Where:
+ --checkwidth:    Enables width checking of <progralisting> elements 
+                  (default length is 72 characters)
+ --checkimages:   Compares images in the current images directory
+                  With those found in the XML and reports differences
+ --linelength=#:  Sets the maximum line length (when --checkwidth 
+                  enabled)
+EOF
+
+    exit 0;
+}
+
 eval "require XML::Parser::PerlSAX;";
 
 if ($@) 


Modified: trunk/tools/idremap.pl
===================================================================
--- trunk/tools/idremap.pl	2006-09-21 09:17:26 UTC (rev 3410)
+++ trunk/tools/idremap.pl	2006-09-21 15:05:32 UTC (rev 3411)
Changed blocks: 1, Lines Added: 1, Lines Deleted: 1; 419 bytes

@@ -105,7 +105,7 @@
         {
             $srcrepl = $1;
             $idref = $2;
-            $type = 'xref';
+            $type = 'link';
             $content = $3;
         }
         my $title = '';