### Eclipse Workspace Patch 1.0
#P drupal-6-testing
Index: modules/blog/blog.module
===================================================================
RCS file: /cvs/drupal/drupal/modules/blog/blog.module,v
retrieving revision 1.286
diff -u -r1.286 blog.module
--- modules/blog/blog.module	11 Oct 2007 16:37:43 -0000	1.286
+++ modules/blog/blog.module	16 Oct 2007 02:55:36 -0000
@@ -192,7 +192,7 @@
       $result = db_query_range(db_rewrite_sql("SELECT n.nid, n.title, n.created FROM {node} n WHERE n.type = 'blog' AND n.status = 1 ORDER BY n.created DESC"), 0, 10);
       if ($node_title_list = node_title_list($result)) {
         $block['content'] = $node_title_list;
-        $block['content'] .= '<div class="more-link">'. l(t('more'), 'blog', array('title' => t('Read the latest blog entries.'))) .'</div>';
+        $block['content'] .= theme('more_link', url('blog'), t('Read the latest blog entries.'));
         $block['subject'] = t('Recent blog posts');
         return $block;
       }
Index: modules/forum/forum.module
===================================================================
RCS file: /cvs/drupal/drupal/modules/forum/forum.module,v
retrieving revision 1.422
diff -u -r1.422 forum.module
--- modules/forum/forum.module	11 Oct 2007 16:37:43 -0000	1.422
+++ modules/forum/forum.module	16 Oct 2007 02:55:36 -0000
@@ -413,9 +413,8 @@
         }
 
         if (!empty($content)) {
-          $content .= '<div class="more-link">'. l(t('more'), 'forum', array('title' => t('Read the latest forum topics.'))) .'</div>';
           $block['subject'] = $title;
-          $block['content'] = $content;
+          $block['content'] = $content . theme('more_link', url('forum'), t('Read the latest forum topics.'));
           return $block;
         }
       }
Index: includes/common.inc
===================================================================
RCS file: /cvs/drupal/drupal/includes/common.inc,v
retrieving revision 1.700
diff -u -r1.700 common.inc
--- includes/common.inc	12 Oct 2007 14:10:17 -0000	1.700
+++ includes/common.inc	16 Oct 2007 02:55:34 -0000
@@ -2788,6 +2788,9 @@
     'feed_icon' => array(
       'arguments' => array('url' => NULL, 'title' => NULL),
     ),
+    'more_link' => array(
+      'arguments' => array('url' => NULL, 'title' => NULL)
+    ),
     'closure' => array(
       'arguments' => array('main' => 0),
     ),
Index: includes/theme.inc
===================================================================
RCS file: /cvs/drupal/drupal/includes/theme.inc,v
retrieving revision 1.390
diff -u -r1.390 theme.inc
--- includes/theme.inc	8 Oct 2007 14:15:09 -0000	1.390
+++ includes/theme.inc	16 Oct 2007 02:55:35 -0000
@@ -1561,6 +1561,18 @@
 }
 
 /**
+ * Returns code that emits the 'more' link used on blocks.
+ *
+ * @param $url
+ *   The url of the main page
+ * @param $title
+ *   A descriptive verb for the link, like 'Read more'
+ */
+function theme_more_link($url, $title) {
+  return '<div class="more-link">'. t('<a href="@link" title="@title">more</a>', array('@link' => check_url($url), '@title' => $title)) .'</div>';
+}
+
+/**
  * Execute hook_footer() which is run at the end of the page right before the
  * close of the body tag.
  *
Index: modules/aggregator/aggregator.module
===================================================================
RCS file: /cvs/drupal/drupal/modules/aggregator/aggregator.module,v
retrieving revision 1.357
diff -u -r1.357 aggregator.module
--- modules/aggregator/aggregator.module	13 Sep 2007 08:02:38 -0000	1.357
+++ modules/aggregator/aggregator.module	16 Oct 2007 02:55:36 -0000
@@ -321,7 +321,7 @@
           if ($feed = db_fetch_object(db_query('SELECT fid, title, block FROM {aggregator_feed} WHERE fid = %d', $id))) {
             $block['subject'] = check_plain($feed->title);
             $result = db_query_range('SELECT * FROM {aggregator_item} WHERE fid = %d ORDER BY timestamp DESC, iid DESC', $feed->fid, 0, $feed->block);
-            $read_more = '<div class="more-link">'. l(t('more'), 'aggregator/sources/'. $feed->fid, array('title' => t("View this feed's recent news."))) .'</div>';
+            $read_more = theme('more_link', url('aggregator/sources/'. $feed->fid), t("View this feed's recent news.")); 
           }
           break;
 
@@ -329,7 +329,7 @@
           if ($category = db_fetch_object(db_query('SELECT cid, title, block FROM {aggregator_category} WHERE cid = %d', $id))) {
             $block['subject'] = check_plain($category->title);
             $result = db_query_range('SELECT i.* FROM {aggregator_category_item} ci LEFT JOIN {aggregator_item} i ON ci.iid = i.iid WHERE ci.cid = %d ORDER BY i.timestamp DESC, i.iid DESC', $category->cid, 0, $category->block);
-            $read_more = '<div class="more-link">'. l(t('more'), 'aggregator/categories/'. $category->cid, array('title' => t("View this category's recent news."))) .'</div>';
+            $read_more = theme('more_link', url('aggregator/categories/'. $category->cid), t("View this category's recent news."));
           }
           break;
       }