X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;ds=sidebyside;f=docs%2Fexdoc;h=f2711d26b1301058f375998378a495f77430b8c5;hb=92aeb68b3bec04320c74b8ed1fa904c0def15483;hp=e161a0c3d42ebbbe4362f555889af8a70b1b3ca4;hpb=4e5e61cf501ef587ec36aaf80d04d734ca0efaca;p=mono.git

diff --git a/docs/exdoc b/docs/exdoc
index e161a0c3d42..f2711d26b13 100644
--- a/docs/exdoc
+++ b/docs/exdoc
@@ -1,17 +1,23 @@
 #!/usr/bin/perl
 
 if ($ARGV[0] eq "-h"){
-    $dir = $ARGV[1];
+    $sourcedir = $ARGV[1];
+    $dir = $sourcedir;
     $html = 1;
     shift @ARGV;
     shift @ARGV;
 }
 
+if ($ARGV[0] eq "-t"){
+    $dir = $ARGV[1];
+    shift @ARGV;
+}
+
 if ($html){
-    opendir (D, "$dir/sources/") || die "Can not open $dir";
+    opendir (D, "$sourcedir/sources/") || die "Can not open $dir";
     while ($n = readdir (D)){
 	if ($n =~ /mono-api-.*\.html$/){
-	    open (IN, "$dir/sources/$n") || die "Can not open $n";
+	    open (IN, "$sourcedir/sources/$n") || die "Can not open $n";
 	    $files[$filecount] = $n;
 	    while (<IN>){
 		@files_content[$filecount] .= $_;