Revision Navigation

Revision 452

Date:

2014/11/27 11:59:16

Author:

ahitrov

Revision Log:

It can be possible to set tab names for project and plugin tabs

Files:


5	5	<tr bgcolor="#efefef">
6	6	<th align="center" width="1%">N</th>
7	7	<th colspan=2>Название</th>
	8	</tr>
8	9	% my $serial=0;
9	10	% foreach my $local_class (sort {$a->class_name cmp $b->class_name} @{ $user->get_available_classes }) {
10	11	% $serial++;


26	26	% my $l_plugin = lc($plugin);
27	27	% next if $state->{$l_plugin}->{contenido_notab};
28	28	% my $uri = "$plugin/";
29		% if ($plugin eq $state->project)
30		% {
31		% $plugin = $state->project_name;
	29	% my $tab_name;
	30	% if (exists $state->{$plugin}{tab_name} && $state->{$plugin}{tab_name}) {
	31	% $tab_name = $state->{$plugin}{tab_name};
	32	% } elsif ($plugin eq $state->project) {
	33	% $tab_name = $state->project_name;
	34	% } else {
	35	% $tab_name = $plugin;
32	36	% }
33	37	% my ($b1, $b2) = $r->uri =~ /^\/contenido\/(\w+)\//i && lc($1) eq $l_plugin ? ('<b>','</b>') : ('','');
34		\| <a href="/contenido/<% $uri %>"><% $b1.$plugin.$b2 %></a>
	38	\| <a href="/contenido/<% $uri %>"><% $b1.$tab_name.$b2 %></a>
35	39	% }
36	40	</td>
37	41	<td align="right">


14	14	# configured
15	15	$self->{debug} = (lc('@DEBUG@') eq 'yes');
16	16	$self->{project} = '@PROJECT@';
	17	$self->{contenido_notab} = 0;
	18	$self->{tab_name} = '@NAME@';
17	19
18	20	# зашитая конфигурация плагина
19	21	$self->{db_type} = 'none'; ### For REAL database use 'remote'
…	…
63	65	$self->{attributes}->{$_} = 'SCALAR' for qw(
64	66	debug
65	67	project
	68	tab_name
66	69
67	70	db_type
68	71	db_keepalive


24	24	## $self->{variable_name} = 'VARIABLE_NAME_SURROUNDED_BY_@@';
25	25
26	26	$self->{contenido_notab} = 1;
	27	$self->{tab_name} = '@PROJECT_NAME@';
27	28
28	29	$self->_init_();
29	30
…	…
55	56	## Здесь список параметров, указанных в new()
56	57	foreach my $attribute ( qw(
57	58	contenido_notab
	59	tab_name
58	60	) )
59	61	{
60	62	$self->{attributes}->{ $attribute } = 'SCALAR';