Fix multicharacter RS in traditional/posix modes.

1 files changed, 1 insertions, 1 deletions

diff --git a/io.c b/io.c
index 3a5748b2..ca5545e7 100644
--- a/io.c
+++ b/io.c
@@ -3668,7 +3668,7 @@ set_RS()
 	if (RS->stlen == 0) {
 		RS_is_null = true;
 		matchrec = rsnullscan;
-	} else if (RS->stlen > 1) {
+	} else if (RS->stlen > 1 && ! do_traditional) {
 		static bool warned = false;
 
 		RS_re_yes_case = make_regexp(RS->stptr, RS->stlen, false, true, true);