mlibc: Cleanup.
[mes.git] / scripts / diff.scm
index 74eef11264dcd2907788b87859b096efd8c8029c..1ce3492a163e9b649791843e0b18dc788a5d9dd8 100755 (executable)
@@ -4,7 +4,7 @@ mes_p=$(command -v mes)
 if [ "$mes_p" -a -z "$MES" ]; then
     MES=guile
 fi
-exec ${MES-mes} -L $(dirname 0) -e '(diff)' -s "$0" "$@"
+exec ${MES-mes} -L ${0%/*} -e '(diff)' -s "$0" "$@"
 !#
 
 ;;; Mes --- Maxwell Equations of Software