Se agrega estilo.

[mecon/meconlib.git] / lib / MECON / HTML / Link.php

diff --git a/lib/MECON/HTML/Link.php b/lib/MECON/HTML/Link.php
index 31e22bd9a538870d85c54e28a92a437e1c61962a..d50e26170916aee57a01fbb7594c57b09c41668a 100644 (file)
--- a/lib/MECON/HTML/Link.php
+++ b/lib/MECON/HTML/Link.php
@@ -24,9 +24,8 @@ Autor:  @@author <@@email>
 $Id$
 -----------------------------------------------------------------------------*/
 
+require_once 'HTML/Common.php';
 
-
-// +X2C Class 892 :MECON_HTML_Link
 /**
  * HTML Link representation.
 When adding GET variables, if the value is an object, it looks for a toString() method, if it doesn't exists or if is an array, it serializes the object/array to get a string value.
@@ -62,6 +61,7 @@ class MECON_HTML_Link extends HTML_Common {
     {
         return $this->_getVars;
     }
+
     /**
      * Sets GetVars.
      *
@@ -75,9 +75,6 @@ class MECON_HTML_Link extends HTML_Common {
         $this->_getVars = $getVars;
     }
 
-    // ~X2C
-
-    // +X2C Operation 178
     /**
      * Constructor.
      *
@@ -89,10 +86,13 @@ class MECON_HTML_Link extends HTML_Common {
      * @return void
      * @access public
      */
-    function MECON_HTML_Link($href = '', $contents = '', $getVars = array(), $attrs = array()) // ~X2C
+    function MECON_HTML_Link($href = '', $contents = '', $getVars = array(), $attrs = array())
     {
         if (is_array($attrs)) {
             $attrs['href'] = $href;
+            if (!isset($attrs['class'])){
+                $attrs['class'] = 'mecon_html_link';
+            }
         } else {
             $attrs .= " href=$href";
         }
@@ -100,9 +100,7 @@ class MECON_HTML_Link extends HTML_Common {
         $this->_getVars = $getVars;
         $this->addContents($contents);
     }
-    // -X2C
 
-    // +X2C Operation 179
     /**
      * Converts to HTML output.
      *
@@ -124,16 +122,16 @@ class MECON_HTML_Link extends HTML_Common {
                     $vars[] = urlencode($var) . '=' . urlencode($v);
                 }
                 if ($vars) {
-                    $val = '?' . join('&', $vars);
+                    $val .= '?' . join('&', $vars);
                 }
+            } else {
+                $val = htmlentities($val);
             }
-            $attrs .= ' ' . $key . '="' . htmlentities($val) . '"';
+            $attrs .= ' ' . $key . '="' . $val . '"';
         }
         return "<A$attrs>" . $this->getContents() . '</A>';
     }
-    // -X2C
 
-    // +X2C Operation 180
     /**
      * Gets hypertext reference.
      *
@@ -144,9 +142,7 @@ class MECON_HTML_Link extends HTML_Common {
     {
         return $this->getAttribute('href');
     }
-    // -X2C
 
-    // +X2C Operation 181
     /**
      * Sets hypertext reference.
      *
@@ -159,29 +155,21 @@ class MECON_HTML_Link extends HTML_Common {
     {
         $this->updateAttributes(array('href' => $href));
     }
-    // -X2C
 
-    // +X2C Operation 182
     /**
      * Set a GET variable.
      *
      * @param  string $key Key for the GET variable.
-     * @param  mixed &$value Value for the variable.
+     * @param  mixed $value Value for the variable.
      *
      * @return void
      * @access public
      */
-    function setGetVar($key, &$value) // ~X2C
+    function setGetVar($key, $value) // ~X2C
     {
-        if (is_object($value)) {
-            $this->attrs[$key] =& $value;
-        } else {
-            $this->attrs[$key] = $value;
-        }
+        $this->_getVars[$key] = $value;
     }
-    // -X2C
 
-    // +X2C Operation 183
     /**
      * Updates GET variables.
      *
@@ -195,9 +183,7 @@ If they doesn't exists, they are added, if they exists, they are updated.
     {
         $this->_getVars += $vars;
     }
-    // -X2C
 
-    // +X2C Operation 184
     /**
      * Unsets (removes) GET variables. This method supports variable arguments.
      *
@@ -213,9 +199,7 @@ If they doesn't exists, they are added, if they exists, they are updated.
             unset($this->_getVars[$key]);
         }
     }
-    // -X2C
 
-    // +X2C Operation 185
     /**
      * Adds contents to the link.
      *
@@ -224,17 +208,11 @@ If they doesn't exists, they are added, if they exists, they are updated.
      * @return void
      * @access public
      */
-    function addContents(&$contents) // ~X2C
+    function addContents($contents) // ~X2C
     {
-        if (is_object($contents)) {
-            $this->_contents[] =& $contents;
-        } else {
-            $this->_contents[] = $contents;
-        }
+        $this->_contents[] = $contents;
     }
-    // -X2C
 
-    // +X2C Operation 186
     /**
      * @return string
      * @access public
@@ -251,9 +229,7 @@ If they doesn't exists, they are added, if they exists, they are updated.
         }
         return $html;
     }
-    // -X2C
 
-    // +X2C Operation 187
     /**
      * @param  mixed $contents New link contents.
      *
@@ -262,9 +238,20 @@ If they doesn't exists, they are added, if they exists, they are updated.
      */
     function setContents($contents) // ~X2C
     {
-        $this->_contents = $contents;
+        $this->_contents = array($contents);
     }
-    // -X2C
 
-} // -X2C Class :MECON_HTML_Link
+    /**
+     * @param  mixed $contents New link contents.
+     *
+     * @return void
+     * @access public
+     */
+    function getCSS()
+    {
+        return '/MECON/css/html/link.css';
+    }
+
+}
+
 ?>
\ No newline at end of file