summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2008-11-29 14:57:54 +0100
committerYorhel <git@yorhel.nl>2008-11-29 14:57:54 +0100
commit1abb35f4ce98e4a69c059f72b427c0c07d26cc40 (patch)
tree04671278d08a8ffd68a73e23e200bd39f297df5d /lib
parent4cefa66a26b690ce93c303e3b619afe7460a6084 (diff)
Small URL change: using ; instead of & in all query strings
...which looks nicer
Diffstat (limited to 'lib')
-rw-r--r--lib/VNDB/Handler/Misc.pm6
-rw-r--r--lib/VNDB/Handler/Users.pm2
-rw-r--r--lib/VNDB/Util/CommonHTML.pm8
3 files changed, 8 insertions, 8 deletions
diff --git a/lib/VNDB/Handler/Misc.pm b/lib/VNDB/Handler/Misc.pm
index 8227f15f..2a2f92ff 100644
--- a/lib/VNDB/Handler/Misc.pm
+++ b/lib/VNDB/Handler/Misc.pm
@@ -80,9 +80,9 @@ sub history {
$n ||= '';
local $_ = ($type ? "/$type$id" : '').'/hist';
$_ .= '?m='.($n eq 'm' ? $v : $f->{m});
- $_ .= '&h='.($n eq 'h' ? $v : $f->{h});
- $_ .= '&t='.($n eq 't' ? $v : $f->{t});
- $_ .= '&e='.($n eq 'e' ? $v : $f->{e});
+ $_ .= ';h='.($n eq 'h' ? $v : $f->{h});
+ $_ .= ';t='.($n eq 't' ? $v : $f->{t});
+ $_ .= ';e='.($n eq 'e' ? $v : $f->{e});
};
# filters
diff --git a/lib/VNDB/Handler/Users.pm b/lib/VNDB/Handler/Users.pm
index 338a21ca..d4ef72d8 100644
--- a/lib/VNDB/Handler/Users.pm
+++ b/lib/VNDB/Handler/Users.pm
@@ -340,7 +340,7 @@ sub list {
items => $list,
options => $f,
nextpage => $np,
- pageurl => "/u/list/$char?o=$f->{o}&s=$f->{s}",
+ pageurl => "/u/list/$char?o=$f->{o};s=$f->{s}",
sorturl => "/u/list/$char",
header => [
[ 'Username', 'username' ],
diff --git a/lib/VNDB/Util/CommonHTML.pm b/lib/VNDB/Util/CommonHTML.pm
index c4c625ad..03fe27eb 100644
--- a/lib/VNDB/Util/CommonHTML.pm
+++ b/lib/VNDB/Util/CommonHTML.pm
@@ -143,7 +143,7 @@ sub htmlHiddenMessage {
sub htmlBrowse {
my($self, %opt) = @_;
- $opt{sorturl} .= $opt{sorturl} =~ /\?/ ? '&' : '?' if $opt{sorturl};
+ $opt{sorturl} .= $opt{sorturl} =~ /\?/ ? ';' : '?' if $opt{sorturl};
# top navigation
$self->htmlBrowseNavigate($opt{pageurl}, $opt{options}{p}, $opt{nextpage}, 't');
@@ -165,8 +165,8 @@ sub htmlBrowse {
lit $opt{header}[$_][0];
if($opt{header}[$_][1]) {
lit ' ';
- lit $opt{options}{s} eq $opt{header}[$_][1] && $opt{options}{o} eq 'a' ? "\x{25B4}" : qq|<a href="$opt{sorturl}o=a&s=$opt{header}[$_][1]">\x{25B4}</a>|;
- lit $opt{options}{s} eq $opt{header}[$_][1] && $opt{options}{o} eq 'd' ? "\x{25BE}" : qq|<a href="$opt{sorturl}o=d&s=$opt{header}[$_][1]">\x{25BE}</a>|;
+ lit $opt{options}{s} eq $opt{header}[$_][1] && $opt{options}{o} eq 'a' ? "\x{25B4}" : qq|<a href="$opt{sorturl}o=a;s=$opt{header}[$_][1]">\x{25B4}</a>|;
+ lit $opt{options}{s} eq $opt{header}[$_][1] && $opt{options}{o} eq 'd' ? "\x{25BE}" : qq|<a href="$opt{sorturl}o=d;s=$opt{header}[$_][1]">\x{25BE}</a>|;
}
end;
}
@@ -193,7 +193,7 @@ sub htmlBrowseNavigate {
my($self, $url, $p, $np, $al, $na) = @_;
return if $p == 1 && !$np;
- $url .= $url =~ /\?/ ? '&p=' : '?p=' unless $na;
+ $url .= $url =~ /\?/ ? ';p=' : '?p=' unless $na;
ul class => 'maintabs ' . ($al eq 't' ? 'notfirst' : 'bottom');
if($p > 1) {
li class => 'left';