Merge pull request #1319 from directhex/systemwide-per-arch-aot-cache
[mono.git] / docs / exdoc
index e161a0c3d42ebbbe4362f555889af8a70b1b3ca4..f2711d26b1301058f375998378a495f77430b8c5 100644 (file)
@@ -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] .= $_;