- updated to 1.22

[packages/NaturalDocs.git] / NaturalDocs-path.patch

diff -uNr NaturalDocs-1.16.org/Modules/NaturalDocs/Settings.pm NaturalDocs-1.16/Modules/NaturalDocs/Settings.pm
--- NaturalDocs-1.16.org/Modules/NaturalDocs/Settings.pm	2004-01-20 17:53:22.000000000 +0100
+++ NaturalDocs-1.16/Modules/NaturalDocs/Settings.pm	2004-01-25 00:29:39.000000000 +0100
@@ -357,7 +357,7 @@
 # Function: StyleDirectory
 # Returns the main style directory.
 sub StyleDirectory
-    {  return NaturalDocs::File->JoinPaths($FindBin::RealBin, 'Styles', 1);  };
+    {  return NaturalDocs::File->JoinPaths('/usr/share/NaturalDocs', 'Styles', 1);  };
 
 # Function: TabLength
 # Returns the number of spaces tabs should be expanded to.
diff -uNr NaturalDocs-1.16.org/NaturalDocs NaturalDocs-1.16/NaturalDocs
--- NaturalDocs-1.16.org/NaturalDocs	2004-01-22 23:00:16.000000000 +0100
+++ NaturalDocs-1.16/NaturalDocs	2004-01-25 00:31:58.000000000 +0100
@@ -3,7 +3,6 @@
 use 5.005;  # When File::Spec was included by default
 
 use FindBin;
-use lib "$FindBin::RealBin/Modules";
 
 sub INIT
     {
@@ -368,7 +367,7 @@
 sub UseDirectory #(directory, directory, directory ...)
     {
     my $extraPath = NaturalDocs::File->JoinDirectories(@_);
-    my $fullPath = NaturalDocs::File->JoinPaths($FindBin::RealBin, $extraPath, 1);
+    my $fullPath = NaturalDocs::File->JoinPaths('/usr/share/perl5/vendor_perl', $extraPath, 1);
 
     my @directories = ( $fullPath );
 
@@ -435,8 +434,8 @@
 
 BEGIN {
 
-    UseDirectory( 'Modules', 'NaturalDocs', 'Builder' );
-    UseDirectory( 'Modules', 'NaturalDocs', 'Extensions' );
+    UseDirectory( 'NaturalDocs', 'Builder' );
+    UseDirectory( 'NaturalDocs', 'Extensions' );
 
     };