From 9a52044462459024d96555e47e38372aeeaa4b1f Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Wed, 23 Sep 2009 15:30:48 -0700
Subject: [PATCH] Add another edge case for nested macros.

---
 t/Macro.t | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/t/Macro.t b/t/Macro.t
index 12c961533..90083028f 100644
--- a/t/Macro.t
+++ b/t/Macro.t
@@ -44,7 +44,7 @@ foreach my $macro (qw/
 }
 $session->config->addToHash('macros', "Ex'tras", "Extras");
 
-plan tests => 47;
+plan tests => 48;
 
 my $macroText = "CompanyName: ^c;";
 my $companyName = $session->setting->get('companyName');
@@ -273,6 +273,8 @@ tie my %quotingEdges, 'Tie::IxHash';
     '^VisualMacro(,,"");'                           => '@MacroCall[``.``.``]:',
     '^ReverseParams(^VisualMacro("something","else"););'
         => '"else");^VisualMacro("something"',
+    '^ReverseParams("^VisualMacro(first word,second word);");'
+        => '@MacroCall[`first word`.`second word`]:',
 );
 while (my ($inText, $outText) = each %quotingEdges) {
     my $procText = $inText;