[interchange] Add support for [if tmp foo] - looks for temporary values set with [ts] or [tn] tags.

Josh Lavin interchange-cvs at icdevgroup.org
Fri May 2 21:54:50 UTC 2014


commit 5bdb9f5efed568c6c9482aed399b6523187b6336
Author: Josh Lavin <josh at perusion.com>
Date:   Fri May 2 14:53:37 2014 -0700

    Add support for [if tmp foo] - looks for temporary values set with [ts] or [tn] tags.

 lib/Vend/Interpolate.pm |    6 ++++++
 1 files changed, 6 insertions(+), 0 deletions(-)
---
diff --git a/lib/Vend/Interpolate.pm b/lib/Vend/Interpolate.pm
index ec230e1..dcd5234 100644
--- a/lib/Vend/Interpolate.pm
+++ b/lib/Vend/Interpolate.pm
@@ -992,6 +992,12 @@ sub conditional {
 				if defined $comp;
 		delete $::Scratch->{$term};
 	}
+	elsif($base eq 'tmp') {
+		$op =	qq%$Tmp->{$term}%;
+		$op = "q{$op}" unless defined $noop;
+		$op .=	qq%	$operator $comp%
+				if defined $comp;
+	}
 	elsif($base =~ /^e?value/) {
 		$op =	qq%$::Values->{$term}%;
 		$op = "q{$op}" unless defined $noop;



More information about the interchange-cvs mailing list