--- trunk/t/2_isis.t	2006/07/09 21:36:33	61
+++ trunk/t/2_isis.t	2006/07/10 12:01:04	62
@@ -3,7 +3,7 @@
 use strict;
 use blib;
 
-use Test::More tests => 136;
+use Test::More tests => 139;
 use File::Spec;
 
 BEGIN {
@@ -315,7 +315,6 @@
 
 diag "generated regexpes = ", Dumper( $regexpes );
 
-
 ok($hash = $isis->to_hash({ mfn => $isis->mfn, regexps => $regexpes, }), 'to_hash(mfn,regexpes)');
 diag "to_hash = ",Dumper( $hash ) if ($debug);
 is_deeply( $hash, {
@@ -327,3 +326,8 @@
               { c => ["901c-3", "901c-3"] },
             ],
 }, 'hash is_deeply');
+
+ok($isis->{regexpes} = $regexpes, 'isis->{regexpes}');
+ok($hash2 = $isis->to_hash( $isis->mfn ), 'to_hash(mfn), global regexpes');
+diag "to_hash = ",Dumper( $hash ) if ($debug);
+is_deeply( $hash2, $hash, 'hash is_deeply');