Commits

Anonymous committed 8cbcc5d

Added the beginning of the lectures section-menu.

Comments (0)

Files changed (5)

 	touch $@
 
 PHILOSOPHY_DEPS = lib/sub-menus/essays.wml lib/MyEssaysNavData.pm
+LECTURES_DEPS = lib/sub-menus/lectures.wml lib/MyLecturesNavData.pm
+
 t2/philosophy/Index/index.html.wml : lib/article-index/article-index.dtd lib/article-index/article-index.xml lib/article-index/article-index.xsl $(PHILOSOPHY_DEPS)
 	touch $@
 
 	( cd vipe && wml $(WML_FLAGS) -DLATEMP_SERVER=vipe -DLATEMP_FILENAME=humour/fortunes/index.html humour/fortunes/fortunes-index.html.wml ) > $@
 
 T2_DOCS_SRC = $(patsubst $(T2_DEST)/%,$(T2_SRC_DIR)/%.wml,$(T2_DOCS_DEST))
+VIPE_DOCS_SRC = $(patsubst $(VIPE_DEST)/%,$(VIPE_SRC_DIR)/%.wml,$(VIPE_DOCS_DEST))
+
 T2_PHILOSOPHY_DOCS_SRC = $(filter-out $(T2_SRC_DIR)/philosophy/Index/%,$(filter $(T2_SRC_DIR)/philosophy/%,$(T2_DOCS_SRC)))
 
 $(T2_PHILOSOPHY_DOCS_SRC):: $(T2_SRC_DIR)/philosophy/%.html.wml: $(PHILOSOPHY_DEPS)
 	touch $@
 
+T2_LECTURES_DOCS_SRC = $(filter $(T2_SRC_DIR)/lecture/%,$(T2_DOCS_SRC))
+
+$(T2_LECTURES_DOCS_SRC):: $(T2_SRC_DIR)/lectures/%.html.wml: $(LECTURES_DEPS)
+	touch $@
+
+VIPE_LECTURES_DOCS_SRC = $(filter $(VIPE_SRC_DIR)/lecture/%,$(VIPE_DOCS_SRC))
+
+$(VIPE_LECTURES_DOCS_SRC):: $(VIPE_SRC_DIR)/lecture/%.html.wml: $(LECTURES_DEPS)
+	touch $@
+

lib/MyLecturesNavData.pm

+package MyLecturesNavData;
+
+my $essays_tree_contents =
+{
+    'host' => "vipe",
+    'text' => "Shlomi Fish' Presentations",
+    'title' => "Shlomi Fish' Presentations",
+    'show_always' => 1,
+    'subs' =>
+    [
+        {
+            'text' => "Presentations",
+            'url' => "lecture/",
+            'title' => "Nav Menu for Shlomi Fish' Presentations",
+        },
+        {
+            'text' => "Perl for Newbies",
+            'url' => "lecture/Perl/Newbies/",
+            'title' => "Perl for Perl Newbies - Introducing Perl for Beginners",
+        },
+        {
+            'text' => "Web Publishing with LAMP",
+            'url' => "lecture/LAMP/",
+            'title' => "Web Publishing using Linux/Apache/MySQL/Perl/PHP/Python",
+            'host' => "t2",
+        },
+        {
+            'text' => "Scheme & Lambda Calculus",
+            'url' => "lecture/Lambda-Calculus/",
+        },
+        {
+            'text' => "Haskell for Perlers",
+            'url' => "lecture/Perl/Haskell/",
+            'title' => "The Haskell Programming Language for Perl Programmers",
+        },
+        {
+            'text' => "Tools",
+            'url' => "lecture/cat/various-tools/",
+            'title' => "Various Tools",
+            'subs' =>
+            [
+                {
+                    'text' => "GIMP",
+                    'url' => "lecture/Gimp/",
+                    'title' => "The GNU Image Manipulation Program",
+                },
+                {
+                    'text' => "PostgreSQL",
+                    'url' => "lecture/PostgreSQL/",
+                    'title' => "The PostgreSQL Database Server",
+                },
+                {
+                    'text' => "Lex & Yacc",
+                    'url' => "lecture/Sys-Call-Track/Lex-Yacc/",
+                    'title' => "Lex and Yacc - for Tokenizing and Parsing",
+                },
+                {
+                    'text' => "Autotools",
+                    'url' =>"lecture/Autotools/",
+                    'title' => "GNU Autoconf/Automake/Libtool",
+                },
+                {
+                    'text' => "Web Meta Lecture",
+                    'url' => "lecture/WebMetaLecture/",
+                    'title' => "Presentation about Web Meta Language",
+                },
+            ],
+        },
+        {
+            'text' => "Welcome to Linux",
+            'url' => "lecture/W2L/",
+            'title' => "Presentations in the Series for Linux Beginners",
+            'subs' =>
+            [
+                {
+                    'text' => "Basic Use",
+                    'url' => "lecture/W2L/Basic_Use/",
+                    'title' => "Basic Linux Use",
+                },
+                {
+                    'text' => "Linux for the Technion Student",
+                    'url' => "lecture/W2L/Technion/",
+                    'title' => "Performing Common Programming Tasks in Linux",
+                },
+                {
+                    'text' => "Blitz",
+                    'url' => "lecture/W2L/Blitz/",
+                    'host' => "t2",
+                    'title' => "Getting up to speed with Linux (Hebrew)",
+                },
+            ],
+        },
+        {
+            'text' => "Projects",
+            'url' => "lecture/cat/projects/",
+            'title' => "Presentations about my Software Projects",
+            'subs' =>
+            [
+                {
+                    'text' => "Freecell Solver",
+                    'url' => "lecture/Freecell-Solver/",
+                    'title' => "Freecell Solver - Evolution of a C Program",
+                    'subs' =>
+                    [
+                        {
+                            'text' => "The Next Presentation",
+                            'url' => "lecture/Freecell-Solver/The-Next-Pres/",
+                            'title' => "Freecell Solver - The Next Presentation",
+                        },
+                        {
+                            'text' => "Project Intro",
+                            'url' => "lecture/Freecell-Solver/The-Next-Pres/project-intro/",
+                            'title' => "Freecell Solver: Project Introduction",
+                        },
+                    ],
+                },
+                {
+                    'text' => "LM-Solve",
+                    'url' => "lecture/LM-Solve/",
+                    'title' => "LM-Solve - a Logic Mazes Solver",
+                },
+            ],
+        },
+    ],
+};
+
+sub get_params
+{
+    return 
+        (
+            'hosts' => MyNavData::get_hosts(),
+            'tree_contents' => $essays_tree_contents,
+        );
+}
+
+1;
+

lib/sub-menus/lectures.wml

+<:{
+require MyLecturesNavData;
+my $filename = "<latemp_default_val "<get-var latemp_filename />" "$(LATEMP_FILE
+NAME)" />";
+$filename =~ s!index\.html$!!;
+$filename = "/$filename";
+
+use vars qw($essays_nav_bar);
+
+$essays_nav_bar = HTML::Widgets::NavMenu->new(
+    'path_info' => $filename,
+    'current_host' => "<latemp_default_val "<get-var latemp_server />" "$(LATEMP
+_SERVER)" />",
+    MyLecturesNavData::get_params(),
+    'ul_classes' => [ "nm_main", "nm_nested", "nm_subnested", "nm_subsubnested", ],
+    );
+
+my $rendered_results = $essays_nav_bar->render();
+
+use vars qw($lectures_nav_html);
+
+$lectures_nav_html = $rendered_results->{html};
+
+}:>
+<define-tag lectures_sub_menu>
+<div class="sub_menu">
+<:{ print join("\n", @$lectures_nav_html); }:>
+</div>
+</define-tag>
+

t2/philosophy/computers/perl/perl6-critique/index.html.wml

 and some discussion at Freshmeat.net</a></h2>
 
 <p>
-(<a href="http://freshmeat.net/articles/view/1339#comment-32746">This comment by
+(<a href="http://freshmeat.net/articles/view/1339/#comment-32746">This comment by
 Michael G. Schwern</a> is a worthwhile read)
 </p>
 
 at this point, and suggested an alternative.
 </p>
 
+<h2>Coverage</h2>
 
+<ul>
+<li>
+<a href="http://www.osnews.com/comment.php?news_id=8569">OSNews.com</a>
+</li>
+<li>
+<a href="http://linmagazine.co.il/node/view/4478">Linmagazine.co.il</a> 
+(in Hebrew)
+</li>
+</ul>
+
+
 </latemp_foot_image>
 
 #include "sub-menus/essays.wml"
+#include "sub-menus/lectures.wml"
 
 <latemp_after_main_title>
 <if "<match "$(LATEMP_FILENAME)" "^philosophy/" action="report" />"
     "<essays_sub_menu />"
-    "" />
+    "<if "<match "$(LATEMP_FILENAME)" "^lecture/" action="report" />"
+        "<lectures_sub_menu />"
+        "" />"
+    />
 </latemp_after_main_title>