[Rt-commit] r6753 - in rt/branches/3.7-EXPERIMENTAL: .

[ruz at bestpractical.com]

Author: ruz
Date: Mon Jan 15 14:37:29 2007
New Revision: 6753

Modified:
   rt/branches/3.7-EXPERIMENTAL/   (props changed)
   rt/branches/3.7-EXPERIMENTAL/lib/RT/Interface/Web/Request.pm

Log:
 r4379 at cubic-pc:  cubic | 2007-01-15 22:49:08 +0300
 * fix calbacks functionality


Modified: rt/branches/3.7-EXPERIMENTAL/lib/RT/Interface/Web/Request.pm
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/RT/Interface/Web/Request.pm	(original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/RT/Interface/Web/Request.pm	Mon Jan 15 14:37:29 2007
@@ -81,9 +81,8 @@
         @$callbacks = sort map { 
                 # Skip backup files, files without a leading package name,
                 # and files we've already seen
-                grep      !$seen{$_}++ && !m'/.' && !/~$/
-                       && m{^/Callbacks/[^/]+\Q$page/$name\E$},
-                     $self->interp->resolver->glob_path($path, $_);
+                grep !$seen{$_}++ && !m{/\.} && !m{~$} && m{^/Callbacks/[^/]+\Q$page/$name\E$},
+                $self->interp->resolver->glob_path($path, $_);
             } @roots;
 
         $cache{ $CacheKey } = $callbacks unless RT->Config->Get('DevelMode');