Changeset 1334
- Timestamp:
- 01/23/08 08:31:43 (9 months ago)
- Files:
-
- branches/release-29/lib/MT/App/CMS.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
branches/release-29/lib/MT/App/CMS.pm
r1319 r1334 7168 7168 $cwd = $ENV{DOCUMENT_ROOT} || $app->mt_dir; 7169 7169 } 7170 $cwd = File::Spec->canonpath($cwd); 7170 $cwd = File::Spec->catdir($cwd, 'BLOG-NAME'); # for including the end of directory separator 7171 $cwd =~ s!BLOG-NAME\z!!; # canonpath() remove it 7171 7172 $cwd =~ s!([\\/])cgi(?:-bin)?([\\/].*)?$!$1!; 7172 7173 $cwd =~ s!([\\/])mt[\\/]?$!$1!i;
