BugFix.

[mecon/yatta.git] / lib / YATTA / Archivo.php

diff --git a/lib/YATTA/Archivo.php b/lib/YATTA/Archivo.php
index 06b3dddad094b7281774e9e3f6ceefc076377b9f..a471702a008f790a0a7c38c67bbf2f60f55aefed 100644 (file)
--- a/lib/YATTA/Archivo.php
+++ b/lib/YATTA/Archivo.php
@@ -144,14 +144,14 @@ class YATTA_Archivo extends MECON_DBO {
      */
     function borrar($db = null)
     {
      */
     function borrar($db = null)
     {

+        //Borro el archivo del tacho
+        if (!unlink(PATH_TACHO.basename($this->archivo))) {
+            return new PEAR_Error('No se pudo borrar el archivo del tacho.');
+        }

         $res = $db->query('DELETE FROM yatta.procesos WHERE id = '. $this->id);
         if (PEAR::isError($res)) {
              trigger_error('Error: ' . $res->getMessage() . "\n", E_USER_ERROR);
         }
         $res = $db->query('DELETE FROM yatta.procesos WHERE id = '. $this->id);
         if (PEAR::isError($res)) {
              trigger_error('Error: ' . $res->getMessage() . "\n", E_USER_ERROR);
         }

-        //Borro el archivo del tacho
-        if (!unlink($this->archivo)) {
-            return new PEAR_Error('No se pudo borrar el archivo del tacho.');
-        }

     }
 
     /**
     }
 
     /**