Changeset 45 for veekun/trunk/lib/Vee/View
- Timestamp:
- 03/10/07 23:56:37 (3 years ago)
- Files:
-
- 1 modified
-
veekun/trunk/lib/Vee/View/TT.pm (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
veekun/trunk/lib/Vee/View/TT.pm
r21 r45 49 49 timespan => \&_format_timespan, 50 50 date => \&_format_date, # later this may have to change to use user's date prefs 51 # email_text => sub { $_[0] =~ s/([\x21-\x7e])/'&#'.ord($1).';'/ge; return shift }, 52 # email_link => sub { $_[0] =~ s/([\x21-\x7e])/'&#'.ord($1).';'/ge; return shift }, 51 email => \&_obfuscate_email, 53 52 # wordcap => \&Vee::wordcap, 54 53 }, … … 67 66 68 67 =cut 68 69 =head2 _obfuscate_email 70 71 Convert an email address into a format that can (in theory) be read by humans 72 but not by bots. 73 74 =cut 75 76 sub _obfuscate_email { 77 my ($email) = @_; 78 $email =~ s/ ([\x21-\x7e]) / '&#' . ord($1) . ';' /gex; 79 return $email; 80 } 69 81 70 82 =head2 _format_date
