From b86350b42807ea39abcd86d985e8e73ae61a9564 Mon Sep 17 00:00:00 2001
From: Bernhard Schmalhofer <Bernhard.Schmalhofer@gmx.de>
Date: Sat, 14 Aug 2010 14:18:07 +0200
Subject: [PATCH] Elimininated an unused variable.

---
 t/examples.t | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/t/examples.t b/t/examples.t
index c3d5548..80e96fd 100644
--- a/t/examples.t
+++ b/t/examples.t
@@ -26,9 +26,7 @@ use Test::More       tests => 2;
 use File::Spec       ();
 
 my $is_win32  = $^O eq 'MSWin32';
-my $parrot    = 'parrot';
-my $lazy_k    = $parrot . q{ } . 'lazy.pbc';
-my $source_fn = 'examples/calc.lazy'; 
+my $lazy_k    = 'parrot lazy.pbc';
 my @test_cases = (
     [ 'calc.lazy', '2*4+3', "11\n" ],
     [ 'cat.lazy',  '2*4+3', "2*4+3\n" ],