mirror of
https://github.com/masscollaborationlabs/emacs.git
synced 2025-07-09 13:40:50 +00:00
f5f9e10097
* lisp/progmodes/cperl-mode.el (cperl-find-pods-heres): Add "return" to the keywords which start a regex. * lisp/progmodes/perl-mode.el (defconst): Add "return" to 'perl--syntax-exp-intro-keywords' (Bug#26850). * test/lisp/progmodes/cperl-mode-tests.el (cperl-test-bug-28650): New test (bug#26850).
16 lines
406 B
Perl
16 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 </
|
|
}
|