X-Git-Url: http://g0dil.de/git?a=blobdiff_plain;f=site_scons%2Flib%2Ffilter.pl;h=c35ae81b9f05779cb342039548a5ca744575e2fa;hb=4d7356cbd92801bc0c4bec27fffe3b0024807185;hp=14ad930e46bdcc6555d72fbdb84cef6dc855caa7;hpb=3620d803f5953b10dcef01b011a587576ef7c5ec;p=senf.git

diff --git a/site_scons/lib/filter.pl b/site_scons/lib/filter.pl
index 14ad930..c35ae81 100755
--- a/site_scons/lib/filter.pl
+++ b/site_scons/lib/filter.pl
@@ -1,8 +1,7 @@
 #!/usr/bin/perl -n
 
 BEGIN {
-    ($topdir=$0) =~ s{doclib/.*$}{};
-    print $topdir,"\n";
+    ($libdir=$0) =~ s{/[^/]*$}{};
 }
 
 s/\s*$//;
@@ -16,6 +15,11 @@ elsif (s/^(\s*)<pre>$/$1<pre class="fragment">/ .. /<\/pre>/ && !/^$/) {
     $i=length($1) if /^(\s*)<pre class="fragment">$/;
     print substr($_,$i),"\n";
 } 
+elsif (/\\diaimage\s+(\S+)/) {
+    $dia=$1;
+    ($png=$dia)=~s/\.dia$/.png/;
+    system("python $libdir/makeDiaImageMap.py $dia");
+}
 else {
     print $_,"\n";
 }