Perlbot/perlbuut
1
0
Fork 0
mirror of https://github.com/perlbot/perlbuut synced 2025-06-08 15:45:42 -04:00
Code Issues Releases Wiki Activity

cosmetic changes to "is also"

Browse source
This commit is contained in:
Ryan Voots 2010-10-07 16:22:22 -04:00
parent 063180ec23
commit 2c890fa4b4
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
plugins/factoids.pm
View file

@ -188,7 +188,7 @@ sub store_factoid {
elsif( $predicate =~ s/^\s*also\s+// ) { elsif( $predicate =~ s/^\s*also\s+// ) {
my $fact = $self->_db_get_fact( _clean_subject( $subject ), $author ); my $fact = $self->_db_get_fact( _clean_subject( $subject ), $author );
$predicate = $fact->{predicate} . " " . $predicate; $predicate = $fact->{predicate} . " | " . $predicate;
} }
return unless return unless