From dca5ad4084de8bcd9f73608f8987ec2aecf76ccf Mon Sep 17 00:00:00 2001
From: cajus <cajus@594d385d-05f5-0310-b6e9-bd551577e9d8>
Date: Wed, 23 Apr 2008 14:55:28 +0000
Subject: [PATCH] Added set_password

git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@10661 594d385d-05f5-0310-b6e9-bd551577e9d8
---
 gosa-si/server/events/krb5.pm | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/gosa-si/server/events/krb5.pm b/gosa-si/server/events/krb5.pm
index 37a4f922a..a34847599 100644
--- a/gosa-si/server/events/krb5.pm
+++ b/gosa-si/server/events/krb5.pm
@@ -24,6 +24,7 @@ my @events = (
     "answer_krb5_create_policy",
     "answer_krb5_modify_policy",
     "answer_krb5_del_policy",
+    "answer_krb5_set_password",
    );
 @EXPORT = @events;
 
@@ -49,6 +50,12 @@ sub krb5_list_principals {
         return ( $msg );
 }
 
+sub krb5_set_password {
+        my ($msg, $msg_hash, $session_id) = @_;
+        $msg =~ s/gosa_krb5/krb5/g;
+        return ( $msg );
+}
+
 
 sub krb5_create_principal {
         my ($msg, $msg_hash, $session_id) = @_;
@@ -172,4 +179,10 @@ sub answer_krb5_del_policy {
     return ($msg);
 }
 
+sub answer_krb5_set_password {
+    my ($msg, $msg_hash, $session_id) = @_ ;
+    $msg =~ s/<target>\S+<\/target>/<target>GOSA<\/target>/g;
+    return ($msg);
+}
+
 1;
-- 
2.30.2