Changeset 1953 for branches/release-35/lib/MT/Template/ContextHandlers.pm

Timestamp:

04/17/08 21:19:00 (20 months ago)

Author:

bchoate

Message:

Creating new encode_sha1 modifier.

Files:

• branches/release-35/lib/MT/Template/ContextHandlers.pm (modified) (2 diffs)

branches/release-35/lib/MT/Template/ContextHandlers.pm

@@ -577 +577 @@
             'dirify' => \&_fltr_dirify,
             'sanitize' => \&_fltr_sanitize,
+            'encode_sha1' => \&_fltr_sha1,
             'encode_html' => \&_fltr_encode_html,
             'encode_xml' => \&_fltr_encode_xml,
@@ -608 +609 @@
         },
     };
+}
+
+sub _fltr_sha1 {
+    my ($str) = @_;
+    require MT::Util;
+    return MT::Util::perl_sha1_digest_hex($str);
 }