Permalink
Browse files

update from live

  • Loading branch information...
1 parent cbc536c commit f8999539117afaca478965814736eaa403a8997e @barbie committed Jan 3, 2011
View
@@ -1,5 +1,10 @@
Changes for the Labyrinth Core Plugins
+5.03 03/01/2011
+ - query added list of fields to be cleaned before displaying.
+ - update from live for saving menu options.
+ - update from live for saving user details.
+
5.02 01/01/2011
- fix to check MASTER access.
View
@@ -1,6 +1,6 @@
{
"name": "Labyrinth::Plugin::Core",
- "version": "5.02",
+ "version": "5.03",
"abstract": "Labyrinth Website Management Framework Core Plugins",
"author": [
"Barbie (BARBIE) <barbie@cpan.org>"
@@ -51,55 +51,55 @@
"provides": {
"Labyrinth::Plugin::Articles": {
"file": "lib/Labyrinth/Plugin/Articles.pm",
- "version": "5.02"
+ "version": "5.03"
},
"Labyrinth::Plugin::Articles::Sections": {
"file": "lib/Labyrinth/Plugin/Articles/Sections.pm",
- "version": "5.02"
+ "version": "5.03"
},
"Labyrinth::Plugin::Content": {
"file": "lib/Labyrinth/Plugin/Content.pm",
- "version": "5.02"
+ "version": "5.03"
},
"Labyrinth::Plugin::Core": {
"file": "lib/Labyrinth/Plugin/Core.pm",
- "version": "5.02"
+ "version": "5.03"
},
"Labyrinth::Plugin::Folders": {
"file": "lib/Labyrinth/Plugin/Folders.pm",
- "version": "5.02"
+ "version": "5.03"
},
"Labyrinth::Plugin::Groups": {
"file": "lib/Labyrinth/Plugin/Groups.pm",
- "version": "5.02"
+ "version": "5.03"
},
"Labyrinth::Plugin::Hits": {
"file": "lib/Labyrinth/Plugin/Hits.pm",
- "version": "5.02"
+ "version": "5.03"
},
"Labyrinth::Plugin::Images": {
"file": "lib/Labyrinth/Plugin/Images.pm",
- "version": "5.02"
+ "version": "5.03"
},
"Labyrinth::Plugin::Inbox": {
"file": "lib/Labyrinth/Plugin/Inbox.pm",
- "version": "5.02"
+ "version": "5.03"
},
"Labyrinth::Plugin::Menus": {
"file": "lib/Labyrinth/Plugin/Menus.pm",
- "version": "5.02"
+ "version": "5.03"
},
"Labyrinth::Plugin::News": {
"file": "lib/Labyrinth/Plugin/News.pm",
- "version": "5.02"
+ "version": "5.03"
},
"Labyrinth::Plugin::Users": {
"file": "lib/Labyrinth/Plugin/Users.pm",
- "version": "5.02"
+ "version": "5.03"
},
"Labyrinth::Plugin::Users::Info": {
"file": "lib/Labyrinth/Plugin/Users/Info.pm",
- "version": "5.02"
+ "version": "5.03"
}
},
"no_index": {
View
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: Labyrinth::Plugin::Core
-version: 5.02
+version: 5.03
abstract: Labyrinth Website Management Framework Core Plugins
author:
- Barbie <barbie@cpan.org>
@@ -31,43 +31,43 @@ build_requires:
provides:
Labyrinth::Plugin::Articles:
file: lib/Labyrinth/Plugin/Articles.pm
- version: 5.02
+ version: 5.03
Labyrinth::Plugin::Articles::Sections:
file: lib/Labyrinth/Plugin/Articles/Sections.pm
- version: 5.02
+ version: 5.03
Labyrinth::Plugin::Content:
file: lib/Labyrinth/Plugin/Content.pm
- version: 5.02
+ version: 5.03
Labyrinth::Plugin::Core:
file: lib/Labyrinth/Plugin/Core.pm
- version: 5.02
+ version: 5.03
Labyrinth::Plugin::Folders:
file: lib/Labyrinth/Plugin/Folders.pm
- version: 5.02
+ version: 5.03
Labyrinth::Plugin::Groups:
file: lib/Labyrinth/Plugin/Groups.pm
- version: 5.02
+ version: 5.03
Labyrinth::Plugin::Hits:
file: lib/Labyrinth/Plugin/Hits.pm
- version: 5.02
+ version: 5.03
Labyrinth::Plugin::Images:
file: lib/Labyrinth/Plugin/Images.pm
- version: 5.02
+ version: 5.03
Labyrinth::Plugin::Inbox:
file: lib/Labyrinth/Plugin/Inbox.pm
- version: 5.02
+ version: 5.03
Labyrinth::Plugin::Menus:
file: lib/Labyrinth/Plugin/Menus.pm
- version: 5.02
+ version: 5.03
Labyrinth::Plugin::News:
file: lib/Labyrinth/Plugin/News.pm
- version: 5.02
+ version: 5.03
Labyrinth::Plugin::Users:
file: lib/Labyrinth/Plugin/Users.pm
- version: 5.02
+ version: 5.03
Labyrinth::Plugin::Users::Info:
file: lib/Labyrinth/Plugin/Users/Info.pm
- version: 5.02
+ version: 5.03
no_index:
directory:
@@ -3,7 +3,7 @@ package Labyrinth::Plugin::Articles;
use warnings;
use strict;
-my $VERSION = '5.02';
+my $VERSION = '5.03';
=head1 NAME
@@ -4,7 +4,7 @@ use warnings;
use strict;
use vars qw($VERSION $ALLSQL $SECTIONID);
-$VERSION = '5.02';
+$VERSION = '5.03';
=head1 NAME
@@ -3,7 +3,7 @@ package Labyrinth::Plugin::Content;
use warnings;
use strict;
-my $VERSION = '5.02';
+my $VERSION = '5.03';
=head1 NAME
@@ -3,7 +3,7 @@ package Labyrinth::Plugin::Core;
use warnings;
use strict;
-our $VERSION = '5.02';
+our $VERSION = '5.03';
1;
@@ -3,7 +3,7 @@ package Labyrinth::Plugin::Folders;
use warnings;
use strict;
-my $VERSION = '5.02';
+my $VERSION = '5.03';
=head1 NAME
@@ -3,7 +3,7 @@ package Labyrinth::Plugin::Groups;
use warnings;
use strict;
-my $VERSION = '5.02';
+my $VERSION = '5.03';
=head1 NAME
@@ -3,7 +3,7 @@ package Labyrinth::Plugin::Hits;
use warnings;
use strict;
-my $VERSION = '5.02';
+my $VERSION = '5.03';
=head1 NAME
@@ -36,6 +36,7 @@ use Labyrinth::Plugin::Content;
my %fields = (
title => { type => 1, html => 1 },
tagline => { type => 0, html => 1 },
+ query => { type => 0, html => 2 },
);
my $WEEKS1 = 60 * 60 * 24 * 7;
@@ -3,7 +3,7 @@ package Labyrinth::Plugin::Images;
use warnings;
use strict;
-my $VERSION = '5.02';
+my $VERSION = '5.03';
=head1 NAME
@@ -3,7 +3,7 @@ package Labyrinth::Plugin::Inbox;
use warnings;
use strict;
-my $VERSION = '5.02';
+my $VERSION = '5.03';
=head1 NAME
@@ -3,7 +3,7 @@ package Labyrinth::Plugin::Menus;
use warnings;
use strict;
-my $VERSION = '5.02';
+my $VERSION = '5.03';
=head1 NAME
@@ -36,6 +36,7 @@ use Labyrinth::Variables;
my %fields = (
menuid => { type => 0, html => 0 },
+ name => { type => 1, html => 1 },
realmid => { type => 1, html => 0 },
typeid => { type => 1, html => 0 },
title => { type => 0, html => 1 },
@@ -48,8 +49,7 @@ for(keys %fields) {
push @allfields, $_;
}
-my @savefields = qw(title typeid realmid parentid);
-my @addfields = qw(title typeid realmid parentid);
+my @savefields = qw(name title typeid realmid parentid);
my $INDEXKEY = 'menuid';
my $ALLSQL = 'AllMenus';
my $SAVESQL = 'SaveMenu';
@@ -342,12 +342,10 @@ sub Save {
return if FieldCheck(\@allfields,\@mandatory);
- my @fields;
+ my @fields = map {$tvars{data}->{$_}} @savefields;
if($cgiparams{$INDEXKEY}) {
- push @fields, $tvars{data}->{$_} for(@savefields);
$dbi->DoQuery($SAVESQL,@fields,$cgiparams{$INDEXKEY});
} else {
- push @fields, $tvars{data}->{$_} for(@addfields);
$cgiparams{$INDEXKEY} = $dbi->IDQuery($ADDSQL,@fields);
}
@@ -3,7 +3,7 @@ package Labyrinth::Plugin::News;
use warnings;
use strict;
-my $VERSION = '5.02';
+my $VERSION = '5.03';
=head1 NAME
Oops, something went wrong. Retry.

0 comments on commit f899953

Please sign in to comment.