From 9dd437997f7478f943b2f0ab19913737a7b49215 Mon Sep 17 00:00:00 2001
From: Doni Pracner <quinnuendo@gmail.com>
Date: Thu, 6 Feb 2014 16:22:04 +0100
Subject: [PATCH] PolinomL - ispravka jednog slucaja brisanja clana

---
 kodovi/polinomi/POLINOML.MOD | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/kodovi/polinomi/POLINOML.MOD b/kodovi/polinomi/POLINOML.MOD
index 6063d5d..309b349 100644
--- a/kodovi/polinomi/POLINOML.MOD
+++ b/kodovi/polinomi/POLINOML.MOD
@@ -100,11 +100,11 @@ BEGIN
       cilj^.k:=k;
     ELSE
       IF p = cilj THEN
-	DISPOSE(p);
+	p := p^.veza;
       ELSE
 	prethodni^.veza:= prethodni^.veza^.veza;
-	DISPOSE(cilj);
       END;
+      DISPOSE(cilj);
     END;
   ELSE
     IF k # 0.0 THEN
-- 
2.25.1