Changeset 12899

Timestamp:

2006-09-28T15:14:33+12:00 (18 years ago)

Author:

mdewsnip

Message:

Fixed up the search institutions by state page javascript.

File:

• trunk/cic-hcap/perllib/plugins/CICPlug.pm (modified) (3 diffs)

trunk/cic-hcap/perllib/plugins/CICPlug.pm

@@ -1275 +1275 @@
     my $id = $full_name_to_id_mapping{$full_names[$i]};
     my $name = $id_to_name_mapping->{$id};
-    # $name =~ s/'/'/g;  # ' # (for Emacs)
     my $extra = $id_to_extra_mapping->{$id} || "";
     print BROWSER_MACROFILE "<td valign=\"top\"><a href=\"_gwcgi_?a=d&amp;d=$id\">" . &html_safe($name) . "</a>$extra</td>";
@@ -1283 +1282 @@
         $id = $full_name_to_id_mapping{$full_names[$i+$half_point]};
         $name = $id_to_name_mapping->{$id};
-        # $name =~ s/'/&apos;/g;  # ' # (for Emacs)
         $extra = $id_to_extra_mapping->{$id} || "";
         print BROWSER_MACROFILE "<a href=\"_gwcgi_?a=d&amp;d=$id\">" . &html_safe($name) . "</a>$extra";
@@ -1324 +1322 @@
     my $text = shift(@_);
     $text =~ s/&/&amp;/g;
+    $text =~ s/\'/&\#39;/g;  # Apostrophes mess up Javascript on the Search by State page
     return $text;
 }