diff --git a/src/modules/_Crypto/md5.c b/src/modules/_Crypto/md5.c
index 6477135f04402858487085784be4938a4d224964..f21b5c02e5b59241531113d52cd73ad7adf0c6c7 100644
--- a/src/modules/_Crypto/md5.c
+++ b/src/modules/_Crypto/md5.c
@@ -1,5 +1,5 @@
 /*
- * $Id: md5.c,v 1.3 1997/03/11 03:16:53 nisse Exp $
+ * $Id: md5.c,v 1.4 1997/04/18 20:05:58 nisse Exp $
  *
  * A pike module for getting access to some common cryptos.
  *
@@ -58,6 +58,7 @@ static void f_update(INT32 args)
 {
   md5_update(THIS, (unsigned INT8 *) (sp-args)->u.string->str, (sp-args)->u.string->len);
   pop_n_elems(args);
+  push_object(this_object());
 }
 
 static void f_digest(INT32 args)
@@ -84,7 +85,7 @@ void MOD_INIT(md5)(void)
   add_storage(sizeof(struct md5_ctx));
   add_function("name", f_name, "function(void:string)", 0);
   add_function("create", f_create, "function(void|object:void)", 0);
-  add_function("update", f_update, "function(string:void)", 0);
+  add_function("update", f_update, "function(string:object)", 0);
   add_function("digest", f_digest, "function(void:string)", 0);
   end_class(MODULE_PREFIX "md5", 0);
 }
diff --git a/src/modules/_Crypto/sha.c b/src/modules/_Crypto/sha.c
index bc197a07b22f7ad11fee45fb904a443f94401e5b..64620382f4922ed568dc09d0ce64020c1a770f6f 100644
--- a/src/modules/_Crypto/sha.c
+++ b/src/modules/_Crypto/sha.c
@@ -51,6 +51,7 @@ static void f_update(INT32 args)
 {
   sha_update(THIS, (unsigned INT8 *) (sp-args)->u.string->str, (sp-args)->u.string->len);
   pop_n_elems(args);
+  push_object(this_object());
 }
 
 static void f_digest(INT32 args)
@@ -77,7 +78,7 @@ void MOD_INIT(sha)(void)
   add_storage(sizeof(struct sha_ctx));
   add_function("name", f_name, "function(void:string)", OPT_TRY_OPTIMIZE);
   add_function("create", f_create, "function(void|object:void)", 0);
-  add_function("update", f_update, "function(string:void)", 0);
+  add_function("update", f_update, "function(string:object)", 0);
   add_function("digest", f_digest, "function(void:string)", 0);
   end_class(MODULE_PREFIX "sha", 0);
 }