(find_mh_folder): Don't know why, but the MAGIC_TO crap wasn't doing

the same kind of match as the other filters, and you couldn't use
parts of the match in the folder name.  Fix.

diff --git a/minc b/minc
index b219f83..8e8ec70 100755 (executable)
--- a/minc
+++ b/minc
@@ -488,8 +488,10 @@ sub find_mh_folder {
                     foreach $contents (@{$headers{lc($header)}}) {
                         foreach $pair (@filter) {
                             ($match, $expression) = @$pair;
                     foreach $contents (@{$headers{lc($header)}}) {
                         foreach $pair (@filter) {
                             ($match, $expression) = @$pair;

-                            if ($contents =~ /$match/) {
-                                return $expression;
+                            if ($contents =~ /$match/i) {
+                                if (eval "\$result = \"$expression\"") {
+                                    return $result;
+                                }

                             }
                         }
                     }
                             }
                         }
                     }