fix.

diff --git a/modules/ml-security.cc b/modules/ml-security.cc
index 456b6c1..8799a01 100644 (file)
--- a/modules/ml-security.cc
+++ b/modules/ml-security.cc
@@ -346,13 +346,13 @@ MNode*  ml_sha256_file (MNode* cell, MlEnv* mlenv) {
 }
 
 /*DOC:
-===sha256-n-string===
- (sha256-n-string KEY TEXT1 ... [#hex | #base64 | :hex BOOL | :base64 BOOL]) -> STRING
+===hmac-sha256-n-string===
+ (hmac-sha256-n-string KEY TEXT1 ... [#hex | #base64 | :hex BOOL | :base64 BOOL]) -> STRING
 
 */
-//#AFUNC       sha256-n-string ml_sha256_n_string
-//#WIKIFUNC    sha256-n-string
-MNode*  ml_sha256_n_string (MNode* cell, MlEnv* mlenv) {
+//#AFUNC       hmac-sha256-n-string    ml_hmac_sha256_n_string
+//#WIKIFUNC    hmac-sha256-n-string
+MNode*  ml_hmac_sha256_n_string (MNode* cell, MlEnv* mlenv) {
     MNode*  arg = cell->cdr ();
     ustring  key;
     ustring  text;