MiniVend Akopia Services

[Date Prev][Date Next][Thread Prev][Thread Next][Minivend by date ][Minivend by thread ]

[PATCH] More verbose on broken UserTags



******    message to minivend-users from Stefan Hornburg <racke@linuxia.de>     ******


After wondering why this f*cking UserTag doesn't work,
I've made this patch to Config.pm. Just remove a `my'
from your favourite UserTag and restart MiniVend.

--- mvend-src/lib/Vend/Config.pm	Wed Apr  7 11:56:48 1999
+++ mvend/lib/Vend/Config.pm	Mon May 17 11:10:06 1999
@@ -1944,9 +1944,17 @@
 				return $c;
 			}
 		}
-		eval {
-			$sub = eval $val;
+		my $fail;
+		{
+		    local $SIG{'__WARN__'} = sub {$fail .= "@_";};		
+		    eval {
+			    $sub = eval $val;
+			}
 		};
+		if($fail) {
+			config_warn "UserTag '$tag' subroutine failed compilation: $fail";
+			return $c;
+		}
 		if($@) {
 			config_warn "UserTag '$tag' subroutine failed compilation: $@";
 			return $c;



-- 
LinuXia - Solutions of Cool Competence - Internetprogramming and more
D-30163 Hannover, Waldstra&#223;e 4, 0511-3941290 (http://www.linuxia.de/)
Come to the land of real computing where penguins and their friends
spread the word of Open Source which crushes windows instantly.
-
To unsubscribe from the list, DO NOT REPLY to this message.  Instead, send
email with 'UNSUBSCRIBE minivend-users' in the body to Majordomo@minivend.com.
Archive of past messages: http://www.minivend.com/minivend/minivend-list


Search for: Match: Format: Sort by: