? committee/person_cat_adm.pm
Index: common.pm
===================================================================
RCS file: /usr/local/cvsroot/comas/comas/perl/Comas/HTML/common.pm,v
retrieving revision 1.31
diff -b -u -2 -r1.31 common.pm
--- common.pm 31 Dec 2004 00:02:09 -0000 1.31
+++ common.pm 20 Feb 2005 10:30:42 -0000
@@ -270,10 +270,10 @@
if (defined $selected_id) {
if ($selected_id eq '') {
- $html = '';
+ $html = '';
} else {
- $html = '';
+ $html = '';
}
} else {
- $html = '';
+ $html = '';
}
}
@@ -383,10 +383,10 @@
$selected_id =~ s/^0// if ($selected_id ne '0');
if ($selected_id ne '') {
- $html = '';
+ $html = '';
} else {
- $html = '';
+ $html = '';
}
} else {
- $html = '';
+ $html = '';
}