Changeset b4fcc06 for perl/lib

Timestamp:

Feb 18, 2008, 4:45:22 PM (17 years ago)

Author:

Nelson Elhage <nelhage@mit.edu>

Branches:

master, barnowl_perlaim, debian, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

9d2f010

Parents:

a6a4155

Message:

We need to stick modules on the beginning of @INC, not the end

File:

• perl/lib/BarnOwl/ModuleLoader.pm (modified) (1 diff)

perl/lib/BarnOwl/ModuleLoader.pm

@@ -24 +24 @@
                 $modules{$1} = 1;
             } elsif(-d "$dir/$f" && -d "$dir/$f/lib") {
-                push @INC, "$dir/$f/lib" unless grep m{^$dir/$f/lib$}, @INC;
+                unshift @INC, "$dir/$f/lib" unless grep m{^$dir/$f/lib$}, @INC;
                 $modules{$f} = 1;
             }