X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/87d94e5fa2a28dac9f26632cc25a29fe088cb1e2..83a0dfa9c88eac62cab4dded6664e5f133ab8d37:/writer.plp diff --git a/writer.plp b/writer.plp index 288891a..9d67520 100644 --- a/writer.plp +++ b/writer.plp @@ -6,27 +6,39 @@ Html({ nocache => 1, raw => <<'EOT', @@ -65,7 +90,9 @@ document.addEventListener('DOMContentLoaded', () => { wpbutton.append('Copy'); wpbutton.onclick = () => { let wptitle = wpinput.value || document.getElementById('form').value; - let wppage = 'https://en.wikipedia.org/w/api.php?action=parse&format=json&origin=*&prop=text&page='+wptitle; + let wplang = document.getElementById('lang').value.substr(0, 2); // crude iso-639-3â2 + let wpapi = `https://${wplang}.wikipedia.org/w/api.php`; + let wppage = wpapi+'?action=parse&format=json&origin=*&prop=text&page='+wptitle; fetch(wppage).then(res => res.json()).then(json => { if (json.error) throw `error returned: ${json.error.info}`; wpinput.value = json.parse.title; @@ -108,13 +135,15 @@ my $db = eval { } or Abort('Database error', 501, $@); my @wordcols = ( + lang => 'Language', + cat => 'Category', form => 'Translation', + alt => 'Synonyms', wptitle => 'Wikipedia', - ref => 'Reference', - cat => 'Category', - lang => 'Language', source => 'Image URL', thumb => 'Convert options', + prio => 'Level', + ref => 'Reference', ); my ($find) = map {{id => $_}} $fields{id} || $Request || (); @@ -125,7 +154,7 @@ if ($find) { } if (exists $get{copy}) { - $row = {%{$row}{ qw(lang cat) }}; + $row = {%{$row}{ qw(prio lang cat) }}; } elsif ($ENV{REQUEST_METHOD} eq 'POST') {{ my $replace = $row; @@ -187,6 +216,7 @@ elsif ($ENV{REQUEST_METHOD} eq 'POST') {{ } }} else { + $row->{prio} //= 1; $row->{$_} = $get{$_} for keys %get; } @@ -194,25 +224,27 @@ my $title = $row->{id} ? "entry #$row->{id}" : 'new entry'; :>