From 7b09a37a895ab2d428d1ab0786aa262ef82efba2 Mon Sep 17 00:00:00 2001
From: Paul Eggert
Date: Tue, 27 Sep 2011 09:31:12 -0700
Subject: * coding.c (Ffind_operation_coding_system): Avoid subscript error.

---
 src/coding.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/coding.c')

diff --git a/src/coding.c b/src/coding.c
index 25ac0e9764c..e8765aea96d 100644
--- a/src/coding.c
+++ b/src/coding.c
@@ -9291,7 +9291,7 @@ usage: (find-operation-coding-system OPERATION ARGUMENTS...)  */)
   if (!SYMBOLP (operation)
       || (target_idx = Fget (operation, Qtarget_idx), !NATNUMP (target_idx)))
     error ("Invalid first argument");
-  if (nargs < 1 + XFASTINT (target_idx))
+  if (nargs <= 1 + XFASTINT (target_idx))
     error ("Too few arguments for operation `%s'",
 	   SDATA (SYMBOL_NAME (operation)));
   target = args[XFASTINT (target_idx) + 1];
-- 
cgit v1.2.1