repo.or.cz
/
sgn.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
added sol100 and chado cvterm pages to validate_all.t
[sgn.git]
/
lib
/
CXGN
/
Page
/
Form
/
Label.pm
blob
2ac6d76ab246830db87dfb18c714483324199d1d
1
2
use
strict
;
3
4
package
CXGN
::
Page
::
Form
::
Label
;
5
6
use
base qw
/ CXGN::Page::Form::ElementI /
;
7
8
sub
new
{
9
my
$class
=
shift
;
10
my
%args
=
@_
;
11
my
$self
=
$class
->
SUPER
::
new
(
@_
);
12
return
$self
;
13
}
14
15
sub
render
{
16
my
$self
=
shift
;
17
return
$self
->
get_contents
();
18
}
19
20
return
1
;