diff --git a/netrc.scm b/netrc.scm
index e1adc43..e5e03b0 100644
--- a/netrc.scm
+++ b/netrc.scm
@@ -1,6 +1,6 @@
 ;;; netrc.scm -- parse authentication information contained in ~/.netrc
 ;;
-;; $Id: netrc.scm,v 1.5 2002/02/12 11:47:53 interp Exp $
+;; $Id: netrc.scm,v 1.6 2002/04/04 22:39:15 interp Exp $
 ;;
 ;; Please send suggestions and bug reports to <emarsden@mail.dotcom.fr>
 
@@ -330,7 +330,11 @@
 		 (password (try-match "password[ \t]+([^ \t]+)" line))
 		 (account  (try-match "account[ \t]+([^ \t]+)" line)))
 	     (if (or machine login password account)
-		 (add netrc-record machine login password account)))))))
+		 (add netrc-record machine login password account)
+		 netrc-record)))))) ; return record on empty / wrong lines
+; (This is a workaround. we should give a warning on malicious .netrc
+; files.  As we do not have an error checking system installed yet, we
+; skip these lines silently.)
 
 ; adds machine login password account stored in a netrc-entry-record
 ; to the entries-list of a netrc-record