fixes warnings unreachable code, unused variables

Change-Id: Id84c5233ffd9709272216937be5cfd9b7b118a4a
diff --git a/d/seher/haeuser/bausparvertrag.c b/d/seher/haeuser/bausparvertrag.c
index 743ac4a..783d6d0 100644
--- a/d/seher/haeuser/bausparvertrag.c
+++ b/d/seher/haeuser/bausparvertrag.c
@@ -98,9 +98,9 @@
 int Einzahlung()
 {
   int *al;
-  object env, po;
+  object env;
 
-  if (old_explode(object_name(po=previous_object()),"#")[0] != PATH+"sb_einzahlung") {
+  if (old_explode(object_name(previous_object()),"#")[0] != PATH+"sb_einzahlung") {
     env = environment();
     HLOG( (env ? getuid(env) : "BANK.LOG"), sprintf("Vertrag: Einzahlung von aussen! TI = %O, PO = %O\n", this_interactive(), previous_object()));
   }