From 7a2f2857d5dd99cfda0b0bea1de6fd4f8208db27 Mon Sep 17 00:00:00 2001
From: Assar Westerlund <assar@sics.se>
Date: Sat, 16 Nov 1996 17:53:45 +0000
Subject: [PATCH] (otp_error): New function.

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@981 ec53bebd-3082-4978-b11e-865c3cabbd6b
---
 lib/otp/otp.c | 12 +++++++++---
 1 file changed, 9 insertions(+), 3 deletions(-)

diff --git a/lib/otp/otp.c b/lib/otp/otp.c
index 5ee1f558c..90a582863 100644
--- a/lib/otp/otp.c
+++ b/lib/otp/otp.c
@@ -45,9 +45,9 @@ RCSID("$Id$");
 #include "otp_md.h"
 
 static OtpAlgorithm algorithms[] = {
-  {ALG_MD4, "md4", 16, otp_md4_hash, otp_md4_init, otp_md4_next},
-  {ALG_MD5, "md5", 16, otp_md5_hash, otp_md5_init, otp_md5_next},
-  {ALG_SHA, "sha", 16, otp_sha_hash, otp_sha_init, otp_sha_next}
+  {OTP_ALG_MD4, "md4", 16, otp_md4_hash, otp_md4_init, otp_md4_next},
+  {OTP_ALG_MD5, "md5", 16, otp_md5_hash, otp_md5_init, otp_md5_next},
+  {OTP_ALG_SHA, "sha", 16, otp_sha_hash, otp_sha_init, otp_sha_next}
 };
 
 OtpAlgorithm *
@@ -60,3 +60,9 @@ otp_find_alg (char *name)
       return &algorithms[i];
   return NULL;
 }
+
+char *
+otp_error (OtpContext *o)
+{
+  return o->err;
+}