--- parser3/src/classes/Attic/root.C	2001/03/12 10:21:23	1.22
+++ parser3/src/classes/Attic/root.C	2001/03/12 13:13:19	1.24
@@ -3,7 +3,7 @@
 	Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
 	Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
 
-	$Id: root.C,v 1.22 2001/03/12 10:21:23 paf Exp $
+	$Id: root.C,v 1.24 2001/03/12 13:13:19 paf Exp $
 */
 
 #include <string.h>
@@ -29,22 +29,23 @@ static void _if(Request& r, const String
 static void _untaint(Request& r, const String& method_name, Array *params) {
 	const String& lang_name=r.process(*static_cast<Value *>(params->get(0))).as_string();
 	String::Untaint_lang lang=static_cast<String::Untaint_lang>(
-		untaint_lang_name_to_enum->get_int(lang_name));
+		untaint_lang_name2enum->get_int(lang_name));
 	if(!lang)
 		R_THROW(0, 0,
 			&lang_name,
 			"invalid untaint language");
 
-	Temp_lang temp_lang(r, lang);
-	Value *value=static_cast<Value *>(params->get(1));
-	// forcing ^untaint[]{this param type}
-	if(!value->get_junction())
-		R_THROW(0, 0,
+	{
+		Temp_lang temp_lang(r, lang);
+		Value *vbody=static_cast<Value *>(params->get(1));
+		// forcing ^untaint[]{this param type}
+		if(!vbody->get_junction())
+			R_THROW(0, 0,
 			&method_name,
 			"body must be junction");
-
-	value=&r.process(*value);
-	r.write_pass_lang(*value);
+		
+		r.write_pass_lang(r.process(*vbody));
+	}
 }