server/ext/map-style.ext

#! perl # mandatory

cf::map->register (qr{^/styles/});

sub init {
   my ($self) = @_;

   $self->{deny_save} = 1;
   $self->{deny_list} = 1;
   $self->{deny_reset} = 1;
   $self->{deny_activate} = 1;

   1
}

Revision:	1.3
Committed:	Tue May 4 21:45:42 2010 UTC (14 years ago) by root
Branch:	MAIN
CVS Tags:	rel-3_1, rel-3_0, HEAD
Changes since 1.2:	+0 -2 lines
Log Message:	* empty log message *
#	User	Rev	Content
1	root	1.2	#! perl # mandatory
2	root	1.1
3			cf::map->register (qr{^/styles/});
4
5			sub init {
6			my ($self) = @_;
7
8			$self->{deny_save} = 1;
9			$self->{deny_list} = 1;
10			$self->{deny_reset} = 1;
11			$self->{deny_activate} = 1;
12
13			1
14			}
15