Skip to content

Commit

Permalink
#103 fixed
Browse files Browse the repository at this point in the history
  • Loading branch information
yegor256 committed May 3, 2024
1 parent 8189d60 commit 6a2420a
Show file tree
Hide file tree
Showing 2 changed files with 5 additions and 0 deletions.
3 changes: 3 additions & 0 deletions bibcop.pl
Original file line number Diff line number Diff line change
Expand Up @@ -191,6 +191,9 @@ sub check_shortenings {
if ($word eq 'vs.') {
next;
}
if ($word =~ /\.\.\.$/) {
next;
}
if ($word =~ /^.*\.$/) {
return "Do not shorten the words in the '$tag', such as '$word'"
}
Expand Down
2 changes: 2 additions & 0 deletions perl-tests/checks.pl
Original file line number Diff line number Diff line change
Expand Up @@ -76,6 +76,8 @@ package bibcop;
$f = 'check_shortenings';
check_fails($f, ('journal' => 'J. Log. Comp.'));
check_passes($f, ('booktitle' => 'Communications of the ACM'));
check_passes($f, ('booktitle' => 'Interesting story?... Maybe'));
check_passes($f, ('booktitle' => 'It\'s simple... Not!'));

$f = 'check_author';
check_fails($f, ('author' => 'I'));
Expand Down

0 comments on commit 6a2420a

Please sign in to comment.