args in cmd: from dondelelcaro

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

diff --git a/src/Modules/md5.pl b/src/Modules/md5.pl
index 8b59b7cd31c41642d5aa2625ad94cd7b49d0703a..440e603566be2645525fba57bdc7a84caa9eccba 100644 (file)
--- a/src/Modules/md5.pl
+++ b/src/Modules/md5.pl
@@ -11,9 +11,7 @@ sub 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;