mirror of
https://github.com/masscollaborationlabs/emacs.git
synced 2025-07-09 13:40:50 +00:00
17 lines
406 B
Perl
17 lines
406 B
Perl
|
sub interesting {
|
||
|
|
$_ = shift;
|
||
|
|
return
|
||
|
|
/>Today is .+\'s birthday\.</
|
||
|
|
|| / like[ds]? your post in </
|
||
|
|
|| /like[ds] your new subscription\. </
|
||
|
|
|| / likes? that you're interested in </
|
||
|
|
|| /> likes? your comment: /
|
||
|
|
|| /&birthdays=.*birthdays?\.<\/a>/;
|
||
|
|
}
|
||
|
|
|
||
|
|
sub boring {
|
||
|
|
return
|
||
|
|
/ likes? your post in </
|
||
|
|
|| / likes? that you're interested in </
|
||
|
|
}
|