1
0
Fork 0
mirror of https://github.com/perlbot/perlbuut synced 2025-06-08 15:35:42 -04:00

god damn it tonight

This commit is contained in:
Ryan Voots 2010-01-04 22:35:16 -05:00
parent 0f4aee2d67
commit 5eca97ace6

View file

@ -361,7 +361,7 @@ sub get_fact_search {
my $ret_string;
for( @$results ) {
#i want a better string here, i'll probably go with just the subject, XXX TODO
$ret_string .= "[" . _fact_literal_format($_) . "] " if ($_->{predicate} =~ /^\s*$/);
$ret_string .= "[" . _fact_literal_format($_) . "] " if ($_->{predicate} !~ /^\s*$/);
}
return $ret_string;