SREZIC / WE_Framework-0.097_01 / lib / WE / Obj / SiteRestr.pm 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
—
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64

              
# -*- perl -*-
#
# $Id: SiteRestr.pm,v 1.2 2005/02/03 00:06:28 eserte Exp $
# Author: Slaven Rezic
#
# Copyright (C) 2001 Online Office Berlin. All rights reserved.
# Copyright (C) 2002,2005 Slaven Rezic.
# This is free software; you can redistribute it and/or modify it under the
# terms of the GNU General Public License, see the file COPYING.
#
# Mail: slaven@rezic.de
# WWW:  http://we-framework.sourceforge.net
#
package WE::Obj::SiteRestr;
use base qw(WE::Obj::Folder);
use strict;
use vars qw($VERSION);
$VERSION = sprintf("%d.%02d", q$Revision: 1.2 $ =~ /(\d+)\.(\d+)/);
sub instantiable { 1 }
sub insertable_types { [qw(WE::Obj::Folder
                           WE::Obj::Sequence
                           WE::Obj::LangCluster
                           WE::Obj::Doc
                          )] }
1;
__END__
=head1 NAME
WE::Obj::SiteRestr - the root object of a site
=head1 SYNOPSIS
=head1 DESCRIPTION
This is the restricted version of L<WE::Obj::Site>. Restricted means,
that only objects of the types L<WE::Obj::Folder>,
L<WE::Obj::Sequence>, L<WE::Obj::LangCluster>, L<WE::Obj::Doc> are
allowed to be children of this folder object.
=head1 HISTORY
This was the former C<WE::Obj::Site>. C<WE::Obj::Site> is now the
unrestricted version of C<WE::Obj::SiteRestr>.
=head1 AUTHOR
Slaven Rezic - slaven@rezic.de
=head1 SEE ALSO
L<WE::Obj::Folder>.
=cut