anndl: Fixed a couple of bugs.

[utils.git] / lddot

diff --git a/lddot b/lddot
index e9c5133..bdbc5eb 100755 (executable)
--- a/lddot
+++ b/lddot
@@ -41,7 +41,7 @@ has() {
 excluded() {
     for obj in "${exclude[@]}"; do
        if [ -d "$obj" ] && [[ "$1" == "$obj"* ]]; then return 0; fi
-       if [ "$1" = "$obj" ]; then return 0; fi
+       if [ "$1" -ef "$obj" ]; then return 0; fi
     done
     return 1
 }
@@ -53,6 +53,7 @@ examine() {
     while read lib; do
        if ! lib2="$(findlib "$lib")"; then
            echo "\"$lib\" [ color=red ];"
+           echo "lddot: $lib: not found" >&2
            echo "\"$1\" -> \"$lib\";"
            continue
        fi
@@ -107,6 +108,7 @@ for bin in "${programs[@]}"; do
        rv=1
        continue
     fi
+    echo "\"$bin\" [ shape=box ];"
     if ! examine "$bin"; then rv=1; fi
 done
 echo "}"