paket-grafik
This commit is contained in:
parent
29e8661179
commit
e462a7b2f6
|
@ -0,0 +1,12 @@
|
||||||
|
#!/bin/sh
|
||||||
|
[ "`which dot`" = "" ] && exit 1
|
||||||
|
[ $1 ] && paket=$1 || exit 1
|
||||||
|
[ -f $paket.grafik ] && rm $paket.grafik
|
||||||
|
[ -f $paket.png ] && rm $paket.png
|
||||||
|
echo "digraph {" > $paket.grafik
|
||||||
|
mps -dly $paket
|
||||||
|
for gerek in `cat tumgerekler.liste`;do
|
||||||
|
echo "<${gerek}> -> <${paket}>;" >> $paket.grafik
|
||||||
|
done
|
||||||
|
echo "}" >> $paket.grafik
|
||||||
|
cat $paket.grafik | dot -T png > $paket.png
|
Loading…
Reference in New Issue