Syntaxhighlighting für Emacs.
[kivitendo-erp.git] / bin / mozilla / is.pl
index d918b50..0334843 100644 (file)
@@ -244,11 +244,9 @@ sub prepare_invoice {
   if ($form->{type} eq "credit_note") {
     $form->{type}     = "credit_note";
     $form->{formname} = "credit_note";
-    $form->{media}    = "screen";
   } else {
     $form->{type}     = "invoice";
     $form->{formname} = "invoice";
-    $form->{media}    = "screen";
   }
 
   if ($form->{id}) {
@@ -582,7 +580,7 @@ sub form_header {
     $onload = qq|alert('$credittext')|;
   }
 
-  $form->{"javascript"} .= qq|<script type="text/javascript" src="js/show_form_details.js">|;
+  $form->{"javascript"} .= qq|<script type="text/javascript" src="js/show_form_details.js"></script>|;
 
   $form->header;
 
@@ -914,7 +912,7 @@ sub form_footer {
              <tr valign=top>
                <td>$notes</td>
                <td>$intnotes</td>
-                <td><select name=payment_id onChange="set_duedate(['payment_id__' + this.value],['duedate'])">$payment
+                <td><select name=payment_id onChange="if (this.value) set_duedate(['payment_id__' + this.value],['duedate'])">$payment
                 </select></td>
              </tr>
            </table>
@@ -1142,11 +1140,6 @@ if ($form->{type} eq "credit_note") {
     }
   }
 
-  if ($form->{menubar}) {
-    require "$form->{path}/menu.pl";
-    &menubar;
-  }
-
   print $form->write_trigger(\%myconfig, scalar(@triggers) / 3, @triggers) .
     qq|