Index: modules/simpletest/drupal_web_test_case.php
===================================================================
RCS file: /cvs/drupal/drupal/modules/simpletest/drupal_web_test_case.php,v
retrieving revision 1.39
diff -u -r1.39 drupal_web_test_case.php
--- modules/simpletest/drupal_web_test_case.php	14 Sep 2008 06:46:34 -0000	1.39
+++ modules/simpletest/drupal_web_test_case.php	16 Sep 2008 02:14:40 -0000
@@ -1195,7 +1195,6 @@
    * later one if an index is given. Match is case insensitive with
    * normalized space. The label is translated label. There is an assert
    * for successful click.
-   * WARNING: Assertion fails on empty ("") output from the clicked link.
    *
    * @param $label
    *   Text between the anchor tags.
@@ -1206,15 +1205,18 @@
    */
   function clickLink($label, $index = 0) {
     $url_before = $this->getUrl();
-    $ret = FALSE;
     $urls = $this->xpath('//a[text()="' . $label . '"]');
+
     if (isset($urls[$index])) {
       $url_target = $this->getAbsoluteUrl($urls[$index]['href']);
-      $curl_options = array(CURLOPT_URL => $url_target);
-      $ret = $this->curlExec($curl_options);
     }
-    $this->assertTrue($ret, t('Clicked link !label (!url_target) from !url_before', array('!label' => $label, '!url_target' => $url_target, '!url_before' => $url_before)), t('Browser'));
-    return $ret;
+
+    $this->assertTrue(isset($urls[$index]), t('Clicked link "!label" (!url_target) from !url_before', array('!label' => $label, '!url_target' => $url_target, '!url_before' => $url_before)), t('Browser'));
+
+    if (isset($urls[$index])) {
+      return $this->drupalGet($url_target);
+    }
+    return FALSE;
   }
 
   /**
