--- parser3/src/main/execute.C	2001/04/28 09:14:49	1.150
+++ parser3/src/main/execute.C	2001/05/07 14:00:49	1.152
@@ -5,11 +5,11 @@
 
 	Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
 
-	$Id: execute.C,v 1.150 2001/04/28 09:14:49 paf Exp $
+	$Id: execute.C,v 1.152 2001/05/07 14:00:49 paf Exp $
 */
 
 #include "pa_config_includes.h"
-#include "code.h"
+#include "pa_opcode.h"
 #include "pa_array.h" 
 #include "pa_request.h"
 #include "pa_vstring.h"
@@ -459,7 +459,8 @@ void Request::execute(const Array& ops)
 			{
 				Value *operand=POP();
 				const char *path=operand->as_string().cstr();
-				Value *value=NEW VBool(pool(), info.uri && strcmp(path, info.uri)<=0);
+				Value *value=NEW VBool(pool(), 
+					info.uri && strncmp(path, info.uri, strlen(path))==0);
 				PUSH(value);
 				break;
 			}