Merge branch 'master' of git@lx-office.linet-services.de:lx-office-erp
authorSven Schöling <s.schoeling@linet-services.de>
Mon, 28 Feb 2011 13:16:47 +0000 (14:16 +0100)
committerSven Schöling <s.schoeling@linet-services.de>
Mon, 28 Feb 2011 13:16:47 +0000 (14:16 +0100)
scripts/find-use.pl
t/002goodperl.t
templates/webpages/admin/edit_groups.html

index 554947d..84129c2 100755 (executable)
@@ -188,11 +188,13 @@ This module is included in C<modules/*>. Don't worry about it.
 This module is documented in C<SL:InstallationCheck> to be necessary, or is a
 dependancy of one of these. Everything alright.
 
-= item !missing
+=item !missing
 
 These modules are neither core, nor included, nor required. This is ok for
 developer tools, but should never occur for modules the actual program uses.
 
+=back
+
 =head1 AUTHOR
 
 http://www.ledgersmb.org/ - The LedgerSMB team
index fa205b1..28b69a4 100644 (file)
@@ -119,7 +119,8 @@ foreach my $file (@testitems) {
         next;
     }
     while (my $file_line = <FILE>) {
-        if ($file_line =~ m/(<\/?$tags>)/) {
+        last if $file_line =~ /^__END__/;
+        if ($file_line =~ m/(<\/?$tags>)/o) {
             $found_html_count++;
             $found_html .= $1;
         }
index af71026..6056107 100644 (file)
@@ -28,7 +28,7 @@
   <p>
    <select name="group_id" size="10">
     [% FOREACH row = GROUPS %]
-    <option value="[% HTML.escape(row.id) %]">[% HTML.escape(row.name) %][% IF row.description %] ([% HTML.escape(row.description) %])[% END %]</option>
+    <option value="[% HTML.escape(row.id) %]"[% ' selected' IF loop.first %]>[% HTML.escape(row.name) %][% IF row.description %] ([% HTML.escape(row.description) %])[% END %]</option>
     [% END %]
    </select>
   </p>