projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add SKIP_CONDITION_SQL debugging aid
[freeside.git]
/
rt
/
bin
/
webmux.pl.in
diff --git
a/rt/bin/webmux.pl.in
b/rt/bin/webmux.pl.in
index
73b1014
..
f9b792f
100644
(file)
--- a/
rt/bin/webmux.pl.in
+++ b/
rt/bin/webmux.pl.in
@@
-3,7
+3,7
@@
#
# COPYRIGHT:
#
#
# COPYRIGHT:
#
-# This software is Copyright (c) 1996-200
5
Best Practical Solutions, LLC
+# This software is Copyright (c) 1996-200
7
Best Practical Solutions, LLC
# <jesse@bestpractical.com>
#
# (Except where explicitly superseded by other copyright notices)
# <jesse@bestpractical.com>
#
# (Except where explicitly superseded by other copyright notices)
@@
-23,7
+23,9
@@
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
-# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+# 02110-1301 or visit their web page on the internet at
+# http://www.gnu.org/copyleft/gpl.html.
#
#
# CONTRIBUTION SUBMISSION POLICY:
#
#
# CONTRIBUTION SUBMISSION POLICY:
@@
-95,7
+97,8
@@
if ($ENV{'MOD_PERL'} && !$RT::DevelMode) {
use File::Path qw( rmtree );
use File::Glob qw( bsd_glob );
use File::Path qw( rmtree );
use File::Glob qw( bsd_glob );
- rmtree([ bsd_glob("$RT::MasonDataDir/obj/*") ], 0, 1);
+ my @files = bsd_glob("$RT::MasonDataDir/obj/*");
+ rmtree([ @files ], 0, 1) if @files;
}
sub handler {
}
sub handler {
@@
-104,15
+107,14
@@
sub handler {
local $SIG{__WARN__};
local $SIG{__DIE__};
local $SIG{__WARN__};
local $SIG{__DIE__};
- # We don't need to handle non-text, non-xml items
if ($r->content_type =~ m/^httpd\b.*\bdirectory/i) {
use File::Spec::Unix;
# Our DirectoryIndex is always index.html, regardless of httpd settings
$r->filename( File::Spec::Unix->catfile( $r->filename, 'index.html' ) );
}
if ($r->content_type =~ m/^httpd\b.*\bdirectory/i) {
use File::Spec::Unix;
# Our DirectoryIndex is always index.html, regardless of httpd settings
$r->filename( File::Spec::Unix->catfile( $r->filename, 'index.html' ) );
}
- elsif (defined( $r->content_type )) {
-
$r->content_type =
~ m!(^text/|\bxml\b)!i or return -1;
- }
+
#
elsif (defined( $r->content_type )) {
+
#$r->content_type !
~ m!(^text/|\bxml\b)!i or return -1;
+
#
}
Module::Refresh->refresh if $RT::DevelMode;
Module::Refresh->refresh if $RT::DevelMode;