[Cpan-forum-commit] rev 353 - in trunk: . www

svn at pti.co.il svn at pti.co.il
Fri Oct 26 13:45:25 EEST 2007


Author: gabor
Date: 2007-10-26 13:45:25 +0300 (Fri, 26 Oct 2007)
New Revision: 353

Added:
   trunk/www/tagging.css
   trunk/www/tagging.js
Modified:
   trunk/
Log:
add tagging javascript code



Property changes on: trunk
___________________________________________________________________
Name: svk:merge
   - 7bc34947-122d-0410-bc5a-f898d2bb5f81:/local/cpan-forum:4574
8c4c90e1-83eb-0310-96eb-e7cb62807872:/local/cpan-forum:12752
   + 7bc34947-122d-0410-bc5a-f898d2bb5f81:/local/cpan-forum:4575
8c4c90e1-83eb-0310-96eb-e7cb62807872:/local/cpan-forum:12752

Added: trunk/www/tagging.css
===================================================================
--- trunk/www/tagging.css	                        (rev 0)
+++ trunk/www/tagging.css	2007-10-26 10:45:25 UTC (rev 353)
@@ -0,0 +1,10 @@
+
+#cpanforum_tags {
+    display: inline;
+}
+
+#cpanforum_tags li {
+    display: inline;
+    padding: 2px;
+    /* background-color: red; */
+}

Added: trunk/www/tagging.js
===================================================================
--- trunk/www/tagging.js	                        (rev 0)
+++ trunk/www/tagging.js	2007-10-26 10:45:25 UTC (rev 353)
@@ -0,0 +1,40 @@
+var cpan_forum_url = "http://cgi.cpanfoum.local/m?";
+
+
+function cpan_forum_list_tags(distro) {
+    //alert("test");
+    var url = cpan_forum_url + "rm=tags_of&distro=" + distro;
+    var tags = new Array("test", "testing", "web", "app dev");
+    return tags;
+}
+
+function cpan_forum_show_tags_as_li(distro) {
+    var tags = cpan_forum_list_tags(distro);
+    var t =  document.getElementById('cpanforum_tags');
+    for(var i=0; i<tags.length; i++) {
+        //alert(tags[i]);
+        li = document.createElement('li');
+        a  = document.createElement('a');
+        a.setAttribute('href', 'javascript:cpan_forum_popup_tag("' + tags[i] + '")');
+        var text = document.createTextNode(tags[i]);
+        a.appendChild(text);
+        li.appendChild(a);
+        t.appendChild(li);
+    }
+//    alert(tags.length);
+}
+
+function cpan_forum_popup_tag(tag) {
+    var w = window.open('', 'cpan_forum_list_distros', "width=600,height=300");
+    w.document.write("Tag: '" + tag + "'<br/>");
+    var distros = cpan_forum_get_distros_by_tag(tag);
+    for(var i=0; i<distros.length; i++) {
+        w.document.write('<a href="/dist/' + distros[i] + '">' + distros[i] + '</a><br>');
+    }
+}
+
+function cpan_forum_get_distros_by_tag(tag) {
+    var distros = Array("CPAN-Forum", "Test-Simple");
+    return distros;
+}
+



More information about the Cpan-forum-commit mailing list