diff --git a/share/html/Admin/CustomFields/Modify.html b/share/html/Admin/CustomFields/Modify.html
index 36f193b..9fb05bd 100644
--- a/share/html/Admin/CustomFields/Modify.html
+++ b/share/html/Admin/CustomFields/Modify.html
@@ -109,7 +109,7 @@
 
 <tr><td class="label">&nbsp;</td><td>
 <input type="hidden" class="hidden" name="SetEnabled" value="1" />
-<input type="checkbox" class="checkbox" name="Enabled" value="1" <% $EnabledChecked %> />
+<input type="checkbox" class="checkbox" name="Enabled" value="1" <% $EnabledChecked |n%> />
 <&|/l&>Enabled (Unchecking this box disables this custom field)</&>
 </td></tr>
 
@@ -203,7 +203,7 @@ if ( $ARGS{'Update'} && $id ne 'new' ) {
 
 $id = $CustomFieldObj->id if $CustomFieldObj->id;
 
-my $EnabledChecked = "checked";
+my $EnabledChecked = qq[checked="checked"];
 $EnabledChecked = '' if $CustomFieldObj->Disabled;
 
 my @CFvalidations = (
diff --git a/share/html/Admin/Elements/SelectGroups b/share/html/Admin/Elements/SelectGroups
index e35ce40..c1fa4c7 100755
--- a/share/html/Admin/Elements/SelectGroups
+++ b/share/html/Admin/Elements/SelectGroups
@@ -45,7 +45,7 @@
 %# those contributions and any derivatives thereof.
 %# 
 %# END BPS TAGGED BLOCK }}}
-<select multiple name="<%$Name%>"  size="10">
+<select multiple="multiple" name="<%$Name%>"  size="10">
 %while (my $group = $groups->Next) {
 <option value="<%$group->id%>"><%$group->Name%>
 %}
diff --git a/share/html/Admin/Elements/SelectNewGroupMembers b/share/html/Admin/Elements/SelectNewGroupMembers
index e26a9ba..874ec0a 100755
--- a/share/html/Admin/Elements/SelectNewGroupMembers
+++ b/share/html/Admin/Elements/SelectNewGroupMembers
@@ -47,7 +47,7 @@
 %# END BPS TAGGED BLOCK }}}
 % if ( $Show ne 'Groups' ) {
 <b><&|/l&>Users</&></b>
-<select multiple name="<% $Name %>Users" size="10">
+<select multiple="multiple" name="<% $Name %>Users" size="10">
 % while ( my $user = $users->Next ) {
 % next if $SkipUsers->{ $user->id };
 <option value="User-<% $user->id %>"><& /Elements/ShowUser, User => $user &></option>
@@ -58,7 +58,7 @@
 
 % if ( $Show ne 'Users' ) {
 <b><&|/l&>Groups</&></b>
-<select multiple name="<% $Name %>Groups" size="10">
+<select multiple="multiple" name="<% $Name %>Groups" size="10">
 % while ( my $group = $groups->Next ) {
 % next if $SkipGroups->{ $group->id };
 <option value="Group-<% $group->id %>"><% $group->Name %></option>
diff --git a/share/html/Admin/Elements/SelectRights b/share/html/Admin/Elements/SelectRights
index 207812d..2df04ba 100755
--- a/share/html/Admin/Elements/SelectRights
+++ b/share/html/Admin/Elements/SelectRights
@@ -65,7 +65,7 @@
 </td>
 <td valign="top">
 <h3><&|/l&>New rights</&></h3> 
-<select size="5"  multiple  name="GrantRight-<%$ACLDesc%>">
+<select size="5" multiple="multiple" name="GrantRight-<%$ACLDesc%>">
 % foreach $right (sort keys %Rights) {
 % next if $current_rights{$right};
       <option value="<%$right%>"  
diff --git a/share/html/Admin/Elements/SelectUsers b/share/html/Admin/Elements/SelectUsers
index 91617a1..950212d 100755
--- a/share/html/Admin/Elements/SelectUsers
+++ b/share/html/Admin/Elements/SelectUsers
@@ -45,7 +45,7 @@
 %# those contributions and any derivatives thereof.
 %# 
 %# END BPS TAGGED BLOCK }}}
-<select multiple name="<% $Name %>"  size="10">
+<select multiple="multiple" name="<% $Name %>"  size="10">
 % while ( my $user = $users->Next ) {
 <option value="<% $user->id %>">\
 <& /Elements/ShowUser, User => $user &>\
diff --git a/share/html/Approvals/Elements/PendingMyApproval b/share/html/Approvals/Elements/PendingMyApproval
index d27d7c6..72ceef2 100755
--- a/share/html/Approvals/Elements/PendingMyApproval
+++ b/share/html/Approvals/Elements/PendingMyApproval
@@ -62,10 +62,10 @@
 <input type="checkbox" class="checkbox" value="1" name="ShowPending"
         <%((!$ARGS{'ShowRejected'} && !$ARGS{'ShowResolved'}) ||
          $ARGS{'ShowPending'})
-        && "checked"%> /> <&|/l&>Show pending requests</&><br />
-<input type="checkbox" class="checkbox" value="1" name="ShowResolved" <% defined($ARGS{'ShowResolved'}) && $ARGS{'ShowResolved'} && "checked"%> /> <&|/l&>Show approved requests</&><br />
-<input type="checkbox" class="checkbox" value="1" name="ShowRejected" <% defined($ARGS{'ShowRejected'}) && $ARGS{'ShowRejected'} && "checked"%> /> <&|/l&>Show denied requests</&><br />
-<input type="checkbox" class="checkbox" value="1" name="ShowDependent" <% defined($ARGS{'ShowDependent'}) && $ARGS{'ShowDependent'} && "checked"%> /> <&|/l&>Show requests awaiting other approvals</&><br />
+        && qq[checked="checked"] |n%> /> <&|/l&>Show pending requests</&><br />
+<input type="checkbox" class="checkbox" value="1" name="ShowResolved" <% defined($ARGS{'ShowResolved'}) && $ARGS{'ShowResolved'} && qq[checked="checked"] |n%> /> <&|/l&>Show approved requests</&><br />
+<input type="checkbox" class="checkbox" value="1" name="ShowRejected" <% defined($ARGS{'ShowRejected'}) && $ARGS{'ShowRejected'} && qq[checked="checked"] |n%> /> <&|/l&>Show denied requests</&><br />
+<input type="checkbox" class="checkbox" value="1" name="ShowDependent" <% defined($ARGS{'ShowDependent'}) && $ARGS{'ShowDependent'} && qq[checked="checked"] |n%> /> <&|/l&>Show requests awaiting other approvals</&><br />
 
 <&|/l,"<input size='15' value='".($created_before->Unix > 0 &&$created_before->ISO)."' name='CreatedBefore' id='CreatedBefore' />"&>Only show approvals for requests created before [_1]</&><br />
 
diff --git a/share/html/Search/Elements/EditFormat b/share/html/Search/Elements/EditFormat
index fccd9c6..3a3d039 100644
--- a/share/html/Search/Elements/EditFormat
+++ b/share/html/Search/Elements/EditFormat
@@ -56,7 +56,7 @@
 
 <tr>
 
-<td valign="top"><select size="6" name="SelectDisplayColumns" multiple>
+<td valign="top"><select size="6" name="SelectDisplayColumns" multiple="multiple">
 % foreach my $field ( @$AvailableColumns) {
 <option value="<% $field %>"><% loc($field) %></option>
 % }
diff --git a/share/html/Search/Elements/EditQuery b/share/html/Search/Elements/EditQuery
index aadec6a..b8c7b0d 100644
--- a/share/html/Search/Elements/EditQuery
+++ b/share/html/Search/Elements/EditQuery
@@ -48,7 +48,7 @@
 <& NewListActions, actions => $actions &>
 <&|/Widgets/TitleBox, title => join(': ', grep defined, loc("Current search"), $Description) &>
 
-<select size="10" name="clauses" style="width: 100%" multiple>
+<select size="10" name="clauses" style="width: 100%" multiple="multiple">
 % $m->out($optionlist);
 </select>