Revert spam

[git.ikiwiki.info.git] / IkiWiki / Plugin / inline.pm

diff --git a/IkiWiki/Plugin/inline.pm b/IkiWiki/Plugin/inline.pm
index c3895d9824a0efbca3f8f339b5a4d068434cfe51..f40956821ec7b4c7ead0b7d020b89859ad2c7016 100644 (file)
--- a/IkiWiki/Plugin/inline.pm
+++ b/IkiWiki/Plugin/inline.pm
@@ -121,8 +121,11 @@ sub sessioncgi ($$) {
        if ($q->param('do') eq 'blog') {
                my $page=titlepage(decode_utf8(scalar $q->param('title')));
                $page=~s/(\/)/"__".ord($1)."__"/eg; # don't create subdirs
        if ($q->param('do') eq 'blog') {
                my $page=titlepage(decode_utf8(scalar $q->param('title')));
                $page=~s/(\/)/"__".ord($1)."__"/eg; # don't create subdirs

+               if (! length $page) {
+                       error(gettext("please enter a page title"));
+               }

                # if the page already exists, munge it to be unique
                # if the page already exists, munge it to be unique

-               my $from=$q->param('from');
+               my $from=decode_utf8($q->param('from'));

                my $add="";
                while (exists $IkiWiki::pagecase{lc($from."/".$page.$add)}) {
                        $add=1 unless length $add;
                my $add="";
                while (exists $IkiWiki::pagecase{lc($from."/".$page.$add)}) {
                        $add=1 unless length $add;


@@ -183,7 +186,7 @@ sub preprocess_inline (@) {
        my $feedonly=yesno($params{feedonly});
 
        # Backwards compatibility
        my $feedonly=yesno($params{feedonly});
 
        # Backwards compatibility

-       if (defined $params{show} && $params{show} =~ m/^\d+$/) {
+       if (defined $params{show} && $params{show} =~ m/^-?\d+$/) {

                $params{limit} = $params{show};
                delete $params{show};
        }
                $params{limit} = $params{show};
                delete $params{show};
        }