(safe_to_load_p): Fix the logic.

diff --git a/src/lread.c b/src/lread.c
index 7b3b5326e676367b5f93b04ea81db04e155c941e..dbc081d9e9639e502379fab02a55b7c6f3245b7e 100644 (file)
--- a/src/lread.c
+++ b/src/lread.c
@@ -760,8 +760,8 @@ safe_to_load_p (fd)
        if (i == 4)
          version = buf[i];
 
-      if (i < nbytes
-         && fast_c_string_match_ignore_case (Vbytecomp_version_regexp,
+      if (i == nbytes
+         || fast_c_string_match_ignore_case (Vbytecomp_version_regexp,
                                              buf + i) < 0)
        safe_p = 0;
     }