fokus in email gefixt

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index 74b4e6591a84bec3d0c87f46f7a183062e39caaf..b518db00edb8b35fad6f71d7f2054a7ca417fab3 100644 (file)
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -978,7 +978,7 @@ sub edit_e_mail {
   my $attachment_filename = $form->generate_attachment_filename();
   my $subject             = $form->{subject} || $form->generate_email_subject();
 
   my $attachment_filename = $form->generate_attachment_filename();
   my $subject             = $form->{subject} || $form->generate_email_subject();
 

-  $form->{"fokus"} = $form->{"email"} ? "Form.subject" : "Form.email";
+  $::request->{layout}->focus($form->{"email"} ? "#subject" : "#email");

   $form->header;
 
   my (@dont_hide_key_list, %dont_hide_key, @hidden_keys);
   $form->header;
 
   my (@dont_hide_key_list, %dont_hide_key, @hidden_keys);

diff --git a/templates/webpages/generic/edit_email.html b/templates/webpages/generic/edit_email.html
index e528c78faacec688678c4cf114d0a3b36aecad33..b8303a0cccb959420254b1b09f787d66dab44d9d 100644 (file)
--- a/templates/webpages/generic/edit_email.html
+++ b/templates/webpages/generic/edit_email.html
@@ -14,7 +14,7 @@
         <tr>
           <th align="right" nowrap>[% 'To' | $T8 %]</th>
 
         <tr>
           <th align="right" nowrap>[% 'To' | $T8 %]</th>
 

-          <td><input name="email" size="30" value="[% HTML.escape(email) %]"></td>
+          <td><input id="email" name="email" size="30" value="[% HTML.escape(email) %]"></td>

         </tr>
         <tr>
           <th align="right" nowrap>[% 'Cc' | $T8 %]</th>
         </tr>
         <tr>
           <th align="right" nowrap>[% 'Cc' | $T8 %]</th>


@@ -28,7 +28,7 @@
         <tr>
           <th align="right" nowrap>[% 'Subject' | $T8 %]</th>
 
         <tr>
           <th align="right" nowrap>[% 'Subject' | $T8 %]</th>
 

-          <td><input name="subject" size="30" value="[% HTML.escape(subject) %]"></td>
+          <td><input id="subject" name="subject" size="30" value="[% HTML.escape(subject) %]"></td>

         </tr>
         <tr>
           <th align="right" nowrap>[% 'Attachment name' | $T8 %]</th>
         </tr>
         <tr>
           <th align="right" nowrap>[% 'Attachment name' | $T8 %]</th>