ソースを参照

Use ISO instead of UTF, and remove extra stars.

Toni Fadjukoff 11 年 前
コミット
89ca40d2b0
共有2 個のファイルを変更した5 個の追加2 個の削除を含む
  1. 1 0
      .gitignore
  2. 4 2
      juvenes.pl

+ 1 - 0
.gitignore ファイルの表示

1
 *.temp.html
1
 *.temp.html
2
+*.temp.js
2
 1.html
3
 1.html
3
 2.html
4
 2.html
4
 3.html
5
 3.html

+ 4 - 2
juvenes.pl ファイルの表示

32
   if ($cur_food =~ /Liha paniini.*tai Kasvis paniini/i && $cur_title eq $pinni_title) {
32
   if ($cur_food =~ /Liha paniini.*tai Kasvis paniini/i && $cur_title eq $pinni_title) {
33
     # you get this every day, ignore
33
     # you get this every day, ignore
34
   } else {
34
   } else {
35
-    push @cur_day_foods, $cur_food if ($cur_food ne "");
35
+    push @cur_day_foods, utf8_to_8859($cur_food) if ($cur_food ne "");
36
   }
36
   }
37
   $cur_food = "";
37
   $cur_food = "";
38
 }
38
 }
114
             # loops different foods in a meal
114
             # loops different foods in a meal
115
             foreach my $food_info (@$menuitems) {
115
             foreach my $food_info (@$menuitems) {
116
               $cur_food .= "\n" if $cur_food ne ""; 
116
               $cur_food .= "\n" if $cur_food ne ""; 
117
-              $cur_food .= $food_info->{'Name'};
117
+              my $name = $food_info->{'Name'};
118
+              $name =~ s/^\*//;
119
+              $cur_food .= $name;
118
               $cur_food .= " (" . $food_info->{'Diets'} . ")" if $food_info->{'Diets'};
120
               $cur_food .= " (" . $food_info->{'Diets'} . ")" if $food_info->{'Diets'};
119
             }
121
             }
120
             finish_food();
122
             finish_food();