GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-22 11:59:43 +01:00
Code Issues Projects Releases Wiki Activity

applets/wiktionary: group definitions w/examples; clean up output

Browse Source
This commit is contained in:
Pragmatic Software 2022-06-29 19:38:17 -07:00
parent 3ef58c2bfa
commit 87eff496e9
2 changed files with 19 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
applets/wiktionary.pl vendored
View File

@ -172,13 +172,24 @@ for (my $i = $start; $i < $num; $i++) {
foreach my $definition (@{$entry->{definitions}}) { foreach my $definition (@{$entry->{definitions}}) {
$text .= "$definition->{partOfSpeech}) "; $text .= "$definition->{partOfSpeech}) ";
$text .= join("\n\n", flatten @{$definition->{text}}) . "\n\n";
if (@{$definition->{examples}}) { my $entry = -1;
$text .= "examples:\n\n";
$text .= join("\n\n", map { $_->{text} } @{$definition->{examples}}) . "\n\n"; foreach my $def (flatten @{$definition->{text}}) {
$def =~ s/^#//;
$text .= "$def\n";
if (@{$definition->{examples}}) {
foreach my $example (@{$definition->{examples}}) {
if ($example->{index} == $entry) {
$text .= " ($example->{text})\n";
}
}
}
$entry++;
$text .= "\n";
} }
} }
push @results, $text if length $text; push @results, $text if length $text;
@ -191,16 +202,6 @@ if (not @results) {
exit 1; exit 1;
} }
my $total_results_count = @results;
if ($total_results_count == 1) {
$entries_text =~ s/s$//;
} else {
$entries_text =~ s/y$/ies/;
}
print "$total_results_count $entries_text for $term:\n\n";
if ($unique) { if ($unique) {
my %uniq; my %uniq;
@ -232,5 +233,5 @@ my $i = @results == 1 ? $num - 1 : 0;
foreach my $result (@results) { foreach my $result (@results) {
$i++; $i++;
next if not $result; next if not $result;
print "$i) $result\n\n"; print "$i) $result\n";
} }

4
lib/PBot/VERSION.pm
View File

@ -25,8 +25,8 @@ use PBot::Imports;
# These are set by the /misc/update_version script # These are set by the /misc/update_version script
use constant { use constant {
BUILD_NAME => "PBot", BUILD_NAME => "PBot",
BUILD_REVISION => 4547, BUILD_REVISION => 4548,
BUILD_DATE => "2022-06-27", BUILD_DATE => "2022-06-29",
}; };
sub initialize {} sub initialize {}