From 927f12daa2e9227fb77bdb9b5651367bc79e39a2 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Mon, 19 Aug 2002 11:34:28 +0000 Subject: [PATCH] (safe_to_load_p): Fix the logic. --- src/lread.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/lread.c b/src/lread.c index 7b3b5326e67..dbc081d9e96 100644 --- 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; } -- 2.39.5