~mdw
/
tgal
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
mason/dhandler (.contact): Slightly reformat trailing-`/' redirect code.
[tgal]
/
mason
/
dhandler
diff --git
a/mason/dhandler
b/mason/dhandler
index
014f5da
..
dded49c
100755
(executable)
--- a/
mason/dhandler
+++ b/
mason/dhandler
@@
-67,9
+67,9
@@
Failed to find ‘<% $path |h %>’.
%###-------------------------------------------------------------------------
<%def .contact>\
<%perl>
%###-------------------------------------------------------------------------
<%def .contact>\
<%perl>
- unless ($r->path_info =~ m!/$!)
{
- $m->redirect(join_paths($SCRIPTURL, $path) . "/");
- }
+ unless ($r->path_info =~ m!/$!)
+ { $m->redirect(join_paths($SCRIPTURL, $path) . "/"); }
+
my $real = join_paths $IMGROOT, $path;
my $url = join_paths $SCRIPTURL, $path;
my ($dd, $ff, $ii) = listdir $real;
my $real = join_paths $IMGROOT, $path;
my $url = join_paths $SCRIPTURL, $path;
my ($dd, $ff, $ii) = listdir $real;