[Rt-commit] r19956 - in rt/3.999/trunk: lib lib/RT/Action
sartak at bestpractical.com
sartak at bestpractical.com
Mon Jun 8 16:50:21 EDT 2009
Author: sartak
Date: Mon Jun 8 16:50:14 2009
New Revision: 19956
Modified:
rt/3.999/trunk/lib/RT.pm
rt/3.999/trunk/lib/RT/Action/ConfigSystem.pm
rt/3.999/trunk/sbin/rt-update-config
Log:
RT->lib_path instead of $RT::BASE_PATH
Modified: rt/3.999/trunk/lib/RT.pm
==============================================================================
--- rt/3.999/trunk/lib/RT.pm (original)
+++ rt/3.999/trunk/lib/RT.pm Mon Jun 8 16:50:14 2009
@@ -61,8 +61,6 @@
use vars qw($Config $System $nobody $Handle );
our $VERSION = '3.999.0';
-our $BASE_PATH = Jifty::Util->app_root;
-
=head1 NAME
RT - Request Tracker
@@ -415,6 +413,14 @@
sub local_plugin_path { Jifty::Util->app_root . '/local/plugins' }
+=head2 lib_path
+
+The root of F</lib> (RT libraries)
+
+=cut
+
+sub lib_path { Jifty::Util->app_root . '/lib' }
+
=head1 BUGS
Please report them to C<rt-bugs at bestpractical.com>, if you know what's
Modified: rt/3.999/trunk/lib/RT/Action/ConfigSystem.pm
==============================================================================
--- rt/3.999/trunk/lib/RT/Action/ConfigSystem.pm (original)
+++ rt/3.999/trunk/lib/RT/Action/ConfigSystem.pm Mon Jun 8 16:50:14 2009
@@ -44,7 +44,7 @@
my $meta = {};
require Pod::POM;
my $parser = Pod::POM->new;
- my $pom = $parser->parse_file( $RT::BASE_PATH . '/lib/RT/Config.pod' )
+ my $pom = $parser->parse_file( RT->lib_path . '/RT/Config.pod' )
or die $parser->error;
require Pod::POM::View::HTML;
require Pod::POM::View::Text;
Modified: rt/3.999/trunk/sbin/rt-update-config
==============================================================================
--- rt/3.999/trunk/sbin/rt-update-config (original)
+++ rt/3.999/trunk/sbin/rt-update-config Mon Jun 8 16:50:14 2009
@@ -88,7 +88,7 @@
else {
my $parser = Pod::POM->new;
my $pom =
- $parser->parse_file( $RT::BASE_PATH . '/lib/RT/Config.pm' )
+ $parser->parse_file( RT->lib_path . '/RT/Config.pm' )
or die $parser->error;
my $view = 'Pod::POM::View::Text';
require Pod::POM::View::Text;
More information about the Rt-commit
mailing list