$QUEUE = new tm_Q();
     $QUEUE->setHStatus($h_id, 7);
     //unsubscribe!
 }
 $created = date("Y-m-d H:i:s");
 //im memo speichern wir den namen des newsletter etc.
 $memo = "unsubscribed";
 $NEWSLETTER = new tm_NL();
 $NL = $NEWSLETTER->getNL($nl_id);
 if (count($NL) > 0) {
     $memo .= " (" . $NL[0]['subject'] . ")";
 }
 //set status adresse, set editor...
 $author = "unsubscribe";
 //always unsubscribe ...
 if ($ADDRESS->unsubscribe($ADR[0]['id'], $author)) {
     $ADDRESS->setAktiv($ADR[0]['id'], 0);
     $ADDRESS->addMemo($ADR[0]['id'], $memo);
     //unsubscribed
     if ($C[0]['unsubscribe_action'] == "blacklist" || $C[0]['unsubscribe_action'] == "blacklist_delete") {
         //add adr to blacklist
         if (!$BLACKLIST->isBlacklisted($ADR[0]['email'], "email", 0)) {
             //only_active=0, also alle, nicht nur aktive, was default waere
             $BLACKLIST->addBL(array("siteid" => TM_SITEID, "expr" => $ADR[0]['email'], "aktiv" => 1, "type" => "email"));
         }
     }
     if ($C[0]['unsubscribe_action'] == "delete" || $C[0]['unsubscribe_action'] == "blacklist_delete") {
         $ADDRESS->delAdr($ADR[0]['id']);
     }
     if ($C[0]['notify_unsubscribe'] == 1) {
         //email bei subscrption an admin....
 if ($val2 == "delete") {
     if (!DEMO) {
         $ADDRESS->delAdr($A[0]['id']);
     }
     $_MAIN_MESSAGE .= "<br>" . sprintf(___("Die Adresse %s wurde gelöscht."), $A[0]['email']);
 }
 if ($val2 == "error") {
     $ADDRESS->setStatus($A[0]['id'], 9);
     $_MAIN_MESSAGE .= "<br>" . sprintf(___("Die Adresse %s wurde als Fehlerhaft markiert."), $A[0]['email']);
 }
 if ($val2 == "aktiv") {
     $ADDRESS->setAktiv($A[0]['id'], 0);
     $_MAIN_MESSAGE .= "<br>" . sprintf(___("Die Adresse %s wurde deaktiviert."), $A[0]['email']);
 }
 if ($val2 == "unsubscribe") {
     $ADDRESS->unsubscribe($A[0]['id'], "Bounce");
     $ADDRESS->setAktiv($A[0]['id'], 0);
     $_MAIN_MESSAGE .= "<br>" . sprintf(___("Die Adresse %s wurde abgemeldet und deaktivert."), $A[0]['email']);
 }
 if ($val2 == "auto") {
     $_MAIN_MESSAGE .= "<br>" . $A[0]['email'] . ": ";
     //wenn erros noch unter dem limit...
     //fehler zaehlen
     $ADDRESS->setAError($A[0]['id'], $A[0]['errors'] + 1);
     $_MAIN_MESSAGE .= " -- " . sprintf(___("Fehler: %s von max. %s"), $A[0]['errors'] + 1, $C[0]['max_mails_retry']);
     //wenn adresse noch nicht abgemeldet!!!!!
     if ($A[0]['status'] != 11) {
         //wenn erros das limit ueberschritten hat:
         if ($A[0]['errors'] + 1 > $C[0]['max_mails_retry']) {
             //unsubscribe und deaktivieren
             $ADDRESS->setStatus($A[0]['id'], 9);