Author: spadkins
Date: Mon Oct 16 11:32:36 2006
New Revision: 7952
Modified:
p5ee/trunk/App-Context/lib/App/Service.pm
Log:
added a comment
Modified: p5ee/trunk/App-Context/lib/App/Service.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Service.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Service.pm Mon Oct 16 11:32:36 2006
@@ -306,6 +306,7 @@
return($newhash); # short-circuit this whole process
}
+ # looking for patterns like the following: {user} {user:Guest}
while ( $text =~ /\{([^\{\}:]+)(:[^\{\}]+)?\}/ ) { # vars of the form
{var}
$var = $1;
$default = $2;