translate

[infobot.git] / src / Modules / md5.pl

diff --git a/src/Modules/md5.pl b/src/Modules/md5.pl
index 8b59b7cd31c41642d5aa2625ad94cd7b49d0703a..42ad77027f7a34851fd68c40eb0a89571190d2d2 100644 (file)
--- a/src/Modules/md5.pl
+++ b/src/Modules/md5.pl
@@ -8,12 +8,12 @@ use strict;
 package md5;
 
 sub md5 {
-    my($message) = @_;
-    return unless &::loadPerlModule("Digest::MD5");
+    my ($message) = @_;
+    return unless &::loadPerlModule('Digest::MD5');
 
-#perl -e'use Digest::MD5 qw(md5_hex); print md5_hex("foo\n") . "\n";'
-
-    &::pSReply(&Digest::MD5::md5_hex($message));
+    &::performStrictReply( &Digest::MD5::md5_hex($message) );
 }
 
 1;
+
+# vim:ts=4:sw=4:expandtab:tw=80