--- module_snippets.php.orig	Fri Feb 18 23:01:18 2005
+++ module_snippets.php	Mon Apr  4 04:17:21 2005
@@ -979,7 +979,53 @@
 	}
 }
 
+function snippet_category_link($filter="", $filename="") {
+	global $db, $Weblogs, $Current_weblog, $Current_subweblog, $Paths;
 
+	if ($filename == "") { $filename = $Paths['pivot_url']."archive.php"; }
+
+	$output=$db->entry["category"];
+
+	if ( ($filter != "") && (isset($Weblogs[$Current_weblog]['sub_weblog'][$Current_subweblog])) ) {
+		$output = array_intersect ( $Weblogs[$Current_weblog]['sub_weblog'][$Current_subweblog]['categories'], $output);
+	}
+
+	$f = create_function('&$item,$key','$item = "<a href=\"'.$filename.'?c=$item\">$item</a>";');
+	array_walk($output, $f);
+
+	if (is_array($output)) {
+		return implode(", ", $output);
+	} else {
+		return "";
+	}
+}
+
+function snippet_category_list($filename="", $format="", $weblog="", $template="") {
+  //livearchive_list
+	global $Weblogs, $Current_weblog, $Cfg, $Paths, $allcats;
+	
+	if ($filename == "") { $filename = $Paths['pivot_url']."archive.php"; }
+
+	if ($format == "") { 
+		$format = "<li><a href='%file%?c=%cat%&amp;w=%weblog%&amp;t=%template%'>%cat%</a></li>"; 
+	}
+
+	$allcats = cfg_cats();
+	foreach ($allcats as $cat) {
+
+		if ($cat['hidden'] == 1) { continue; }
+		
+		$my_output = $format;
+		$my_output = str_replace('%file%', $filename, $my_output);
+		$my_output = str_replace('%cat%', $cat['name'], $my_output);
+		$my_output = str_replace('%weblog%', $weblog, $my_output);
+		$my_output = str_replace('%template%', $template, $my_output);
+		$output .= $my_output;	
+	}
+	
+	return $output;
+
+}
 
 // for backwards compatibility
 function snippet_email() {