changed comments from old to new style (auto-generated files)
[rocksndiamonds.git] / build-scripts / create_element_defs.pl
index c1da1dafea8bbbd6e9a5130be151d9a328faf7d9..896d672f4a859924f2f1c74dac8558e6d0457060 100755 (executable)
@@ -243,12 +243,12 @@ sub print_file_header
     close FILE;
 
     print "\n";
-    print "/* ----- $text_auto ----- */\n";
+    print "// ------- $text_auto -------\n";
     print "\n";
     print "#ifndef $filename_def\n";
     print "#define $filename_def\n";
     print "\n";
-    print "/* $comment */\n";
+    print "// $comment\n";
     print "\n";
 }
 
@@ -259,7 +259,7 @@ sub print_file_footer
     $filename_def =~ s/\./_/;
 
     print "\n";
-    print "#endif      /* $filename_def */\n";
+    print "#endif      // $filename_def\n";
 }
 
 sub get_tabs
@@ -1573,7 +1573,7 @@ sub print_element_to_graphic_list
        {
            print_element_to_graphic_entry($element_without_action,
                                           $gfx_action,
-                                          '-1',
+                                          $gfx_direction,
                                           $gfx_crumbled,
                                           $graphic);
        }
@@ -2428,7 +2428,9 @@ sub print_image_config_vars
 
            print_image_config_var_entry("\"$token\"", "&$var");
 
-           if ($var =~ /^(titlescreen.*)\[\d\]/ ||
+           if ($var =~ /^(title)_default/ ||
+               $var =~ /^(title_initial)_default/ ||
+               $var =~ /^(titlescreen.*)\[\d\]/ ||
                $var =~ /^(titlemessage.*)\[\d\]/)
            {
                my $prefix = $1;