From: Nicholas Clark <nick@ccl4.org>
Date: Sun, 13 Mar 2011 10:39:15 +0000 (+0000)
Subject: In t/op/mydef.t, add missing C<eval> to a test.
X-Git-Tag: accepted/trunk/20130322.191538~4981
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=e205853886e506c9c43b97ba4ead8146bda01a70;p=platform%2Fupstream%2Fperl.git

In t/op/mydef.t, add missing C<eval> to a test.

As the test is for 'ne', it passes without the eval. However, the test's
description and surrounding code make it clear that it is a test for the
results of eval.
---

diff --git a/t/op/mydef.t b/t/op/mydef.t
index ca77c27..123767c 100644
--- a/t/op/mydef.t
+++ b/t/op/mydef.t
@@ -196,7 +196,7 @@ my $file = tempfile();
     ok( eval q/$fqdb::_/ eq 'fqdb', 'fully qualified, evaled $_ is not in main' );
     package fqdb;
     ::ok( $_ ne 'fqdb', 'unqualified $_ is in main' );
-    ::ok( q/$_/ ne 'fqdb', 'unqualified, evaled $_ is in main' );
+    ::ok( eval q/$_/ ne 'fqdb', 'unqualified, evaled $_ is in main' );
 }
 
 {