Fix sodexo restaurants not rendered on tty/

sodexo.pl

@@ -5,8 +5,8 @@ use POSIX qw(strftime);
 my @restaurant_info = (
   #[ "(TaY) Sodexo Linna", "http://www.sodexo.fi/fi-FI/linna/lounas/", "right" ],
   #[ "(TTY) Sodexo Erkkeri", "http://www.sodexo.fi/fi-FI/erkkeri/lounas/", "left" ]
-  [ "(TaY) Sodexo Linna", "http://www.sodexo.fi/linna", "right", 92],
-  [ "(TTY) Sodexo Erkkeri", "http://www.sodexo.fi/erkkeri", "left", 100]
+  [ "(TaY) Sodexo Linna", "http://www.sodexo.fi/linna", "", "right", 92],
+  [ "(TTY) Sodexo Erkkeri", "http://www.sodexo.fi/erkkeri", "", "left", 100]
 );
 
 my ($cur_text, $cur_title, $parse_func, $day_id, $week);
@@ -41,7 +41,7 @@ sub get_sodexo_restaurants {
   # Loops restraurants
   foreach my $i (@restaurant_info) {
     my @info = @{$i};
-    my $kitchen = $info[3];
+    my $kitchen = $info[4];
     $title = $info[0];
     $cur_title = $title;
     $open_hours = "";