| … | |
… | |
| 103 | } |
103 | } |
| 104 | |
104 | |
| 105 | sub setListRow($$$) { |
105 | sub setListRow($$$) { |
| 106 | my ($self, $set, $multiSet, $preOpenSets) = @_; |
106 | my ($self, $set, $multiSet, $preOpenSets) = @_; |
| 107 | |
107 | |
| 108 | my $name = $set->set_id; |
108 | my $name = "set " . $set->set_id; |
| 109 | |
109 | |
| 110 | my $interactiveURL = "$name/?" . $self->url_authen_args; |
110 | my $interactiveURL = "$name/?" . $self->url_authen_args; |
| 111 | #my $hardcopyURL = "hardcopy/$name/?" . $self->url_authen_args; |
111 | #my $hardcopyURL = "hardcopy/$name/?" . $self->url_authen_args; |
| 112 | |
112 | |
| 113 | my $openDate = formatDateTime($set->open_date); |
113 | my $openDate = formatDateTime($set->open_date); |