OSDN Git Service

改行コードをLFに統一。
[fswiki/fswiki-lite.git] / category.cgi
index 740fafb..5db5f48 100644 (file)
@@ -1,39 +1,39 @@
-#!/usr/bin/perl\r
-################################################################################\r
-#\r
-# FSWiki Lite - ¥«¥Æ¥´¥ê¤Î°ìÍ÷\r
-#\r
-################################################################################\r
-require "./lib/common.pl";\r
-#===============================================================================\r
-# ½èÍý¤Î¿¶¤êʬ¤±\r
-#===============================================================================\r
-&ReadParse();\r
-if($in{'c'} ne ""){\r
-       &show_category($in{'c'});\r
-       \r
-} else {\r
-       &show_all_category();\r
-       \r
-}\r
-\r
-#===============================================================================\r
-# »ØÄꤵ¤ì¤¿¥«¥Æ¥´¥ê¤òɽ¼¨\r
-#===============================================================================\r
-sub show_category {\r
-       my $category = shift;\r
-       \r
-       &print_header("¥«¥Æ¥´¥ê");\r
-       print &Wiki::Plugin::category_list($category);\r
-       &print_footer();\r
-}\r
-\r
-#===============================================================================\r
-# Á´¤Æ¤Î¥«¥Æ¥´¥ê¤òɽ¼¨\r
-#===============================================================================\r
-sub show_all_category {\r
-       &print_header("¥«¥Æ¥´¥ê");\r
-       print "<h2>".&Util::escapeHTML($category)."</h2>\n";\r
-       print &Wiki::Plugin::category_list();\r
-       &print_footer();\r
-}\r
+#!/usr/bin/perl
+################################################################################
+#
+# FSWiki Lite - ¥«¥Æ¥´¥ê¤Î°ìÍ÷
+#
+################################################################################
+require "./lib/common.pl";
+#===============================================================================
+# ½èÍý¤Î¿¶¤êʬ¤±
+#===============================================================================
+&ReadParse();
+if($in{'c'} ne ""){
+       &show_category($in{'c'});
+       
+} else {
+       &show_all_category();
+       
+}
+
+#===============================================================================
+# »ØÄꤵ¤ì¤¿¥«¥Æ¥´¥ê¤òɽ¼¨
+#===============================================================================
+sub show_category {
+       my $category = shift;
+       
+       &print_header("¥«¥Æ¥´¥ê");
+       print &Wiki::Plugin::category_list($category);
+       &print_footer();
+}
+
+#===============================================================================
+# Á´¤Æ¤Î¥«¥Æ¥´¥ê¤òɽ¼¨
+#===============================================================================
+sub show_all_category {
+       &print_header("¥«¥Æ¥´¥ê");
+       print "<h2>".&Util::escapeHTML($category)."</h2>\n";
+       print &Wiki::Plugin::category_list();
+       &print_footer();
+}