Converting to D7

lqdn_similar_nodes.info

 ; $Id$
 name = "Similar nodes"
 description = Provides blocks with nodes in the same dossier(s).
-core = 6.x
+core = 7.x
 package = "La Quadrature"
 dependencies[] = lqdn_dossiers
 dependencies[] = lqdn_latest_nodes

lqdn_similar_nodes.module

@@ -40,21 +40,18 @@ function _lqdn_similar_nodes_get_dossiers($n_tags) {
   return $dossiers;
 }
 
-function lqdn_similar_nodes_block ($op = 'list', $delta = 0, $edit = array())
+function lqdn_similar_nodes_block_list_alter (&$blocks)
+{
+  $blocks[0]['info'] = t("Related dossiers");
+  $blocks[1]['info'] = t("Related quad'news");
+  $blocks[2]['info'] = t("Related press review");
+  $blocks[3]['info'] = t("Related content (quad'news + press review)");
+}
+
+function lqdn_similar_nodes_block_view ($delta = '')
 {
   global $language;
 
-  switch($op)
-    {
-      case 'list':
-        $blocks=array();
-        $blocks[0]['info'] = t("Related dossiers");
-        $blocks[1]['info'] = t("Related quad'news");
-        $blocks[2]['info'] = t("Related press review");
-        $blocks[3]['info'] = t("Related content (quad'news + press review)");
-        return $blocks;
-        break;
-      case 'view':
         $block=array();
 
         // Does this page is a actualite node?
@@ -119,5 +116,4 @@ function lqdn_similar_nodes_block ($op = 'list', $delta = 0, $edit = array())
           $block['content'] = _lqdn_latest_nodes_latest_news_and_press_articles($dossier, 7, 0);
           return $block;
         }
-    }
 }