1 files changed, 4 insertions, 1 deletions
diff --git a/bin/clogin.in b/bin/clogin.in
index bfe3ae1..e239d50 100755
--- a/bin/clogin.in
+++ b/bin/clogin.in
@@ -248,7 +248,10 @@ proc source_password_file { } {
 	send_user "Error: $password_file must not be world readable/writable\n"
 	exit 1
     }
-    source $password_file
+    if [ catch {source $password_file} reason ] {
+	send_user "Error: $reason\n"
+	exit 1
+    }
 }
 
 # Log into the router.