Se pone bien el redirect, se borra un estilo deprecated.

[mecon/ai.git] / lib / AI / Error.php

diff --git a/lib/AI/Error.php b/lib/AI/Error.php
index b4a221a977492a96253b438bbd0d9e0f1aa2c304..3af3bef6b5bcaff53f0c0f87e9ef853c7eec7981 100644 (file)
--- a/lib/AI/Error.php
+++ b/lib/AI/Error.php
@@ -39,8 +39,24 @@ require_once 'PEAR.php';
  */
 define('AI_ERROR_NO_RESULTADOS', 1);
 
+/**
+ * Error que indica que un padre no se puede borrar porque aún tiene
+ * hijos.
+ *
+ * Es un error esperado y poco grave que sucede cuando se intenta borrar
+ * un elemento del tipo AI_DBTreeObject que aún tiene hijos.
+ */
+define('AI_ERROR_TIENE_HIJOS', 2);
+
+/**
+ * Error que indica que el tipo de orden usado no es válido.
+ * Es un error no esperado.
+ */
+define('AI_ERROR_ORDEN_INVALIDO', 3);
+
 // +X2C Class 469 :AI_Error
 /**
+ * @package AI
  * @access public
  */
 class AI_Error extends PEAR_Error {
@@ -48,7 +64,7 @@ class AI_Error extends PEAR_Error {
 
     // +X2C Operation 470
     /**
-     * @param  int $codigo Cdigo de error.
+     * @param  int $codigo Código de error.
      * @param  string $mensaje Mensaje para mostrar
      *
      * @return void
@@ -60,6 +76,20 @@ class AI_Error extends PEAR_Error {
     }
     // -X2C
 
+    // +X2C Operation 530
+    /**
+     * @param  mixed $error Variable a evaluar si es un error.
+     *
+     * @return bool
+     * @access public
+     * @static
+     */
+    function isError($error) // ~X2C
+    {
+        return is_a($error, 'ai_error');
+    }
+    // -X2C
+
 } // -X2C Class :AI_Error
 
 ?>
\ No newline at end of file