Pages - The new CMS system from Notice

This creates flat-files for the public part of your site.
It uses a templating system that requires no template, (though
if you hand it pages.html marked up with id="menu" you will get
a lot done.)

Pages leverages the power of ckeditor 4.0 and HTML::TreeBuilder

lib/Notice/DB/Result/Group.pm

@@ -91,6 +91,5 @@ __PACKAGE__->add_unique_constraint("gr_id", ["gr_id"]);
 # Created by DBIx::Class::Schema::Loader v0.07010 @ 2011-11-24 17:01:30
 # DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:GXImIPSdV5ftUo2sKYSdVg
 
-
-# You can replace this text with custom code or comments, and it will be preserved on regeneration
+__PACKAGE__->has_many('members' => 'Notice::DB::Result::GroupMember', {'foreign.gg_grid' => 'self.gr_id'});
 1;

lib/Notice/DB/Result/Page.pm

@@ -0,0 +1,166 @@
+use utf8;
+package Notice::DB::Result::Page;
+
+# Created by DBIx::Class::Schema::Loader
+# DO NOT MODIFY THE FIRST PART OF THIS FILE
+
+=head1 NAME
+
+Notice::DB::Result::Page - mostly html, but can be raw text
+
+=cut
+
+use strict;
+use warnings;
+
+use base 'DBIx::Class::Core';
+
+=head1 TABLE: C<Pages>
+
+=cut
+
+__PACKAGE__->table("Pages");
+
+=head1 ACCESSORS
+
+=head2 pa_id
+
+  data_type: 'integer'
+  is_auto_increment: 1
+  is_nullable: 0
+
+=head2 pa_name
+
+  data_type: 'varchar'
+  is_nullable: 0
+  size: 255
+
+=head2 pa_title
+
+  data_type: 'varchar'
+  is_nullable: 1
+  size: 255
+
+=head2 pa_link
+
+  data_type: 'varchar'
+  is_nullable: 1
+  size: 255
+
+How the link to this page from others will look
+
+=head2 pa_published
+
+  data_type: 'integer'
+  is_nullable: 1
+
+Is it live?
+
+=head2 pa_lang
+
+  data_type: 'char'
+  is_nullable: 1
+  size: 6
+
+en_GB fr zn
+
+=head2 pa_added
+
+  data_type: 'datetime'
+  datetime_undef_if_invalid: 1
+  is_nullable: 1
+
+date written or published
+
+=head2 pa_updated
+
+  data_type: 'datetime'
+  datetime_undef_if_invalid: 1
+  is_nullable: 1
+
+date updated
+
+=head2 pa_owner
+
+  data_type: 'integer'
+  is_nullable: 1
+
+peid
+
+=head2 pa_template
+
+  data_type: 'varchar'
+  is_nullable: 1
+  size: 255
+
+overide from the pages.html template
+
+=head2 pa_change
+
+  data_type: 'integer'
+  default_value: 0
+  is_nullable: 1
+
+how different is this from the last version, as a percentage
+
+=head2 pa_ge
+
+  data_type: 'blob'
+  is_nullable: 1
+
+=cut
+
+__PACKAGE__->add_columns(
+  "pa_id",
+  { data_type => "integer", is_auto_increment => 1, is_nullable => 0 },
+  "pa_name",
+  { data_type => "varchar", is_nullable => 0, size => 255 },
+  "pa_title",
+  { data_type => "varchar", is_nullable => 1, size => 255 },
+  "pa_link",
+  { data_type => "varchar", is_nullable => 1, size => 255 },
+  "pa_published",
+  { data_type => "integer", is_nullable => 1 },
+  "pa_lang",
+  { data_type => "char", is_nullable => 1, size => 6 },
+  "pa_added",
+  {
+    data_type => "datetime",
+    "datetime_undef_if_invalid" => 1,
+    is_nullable => 1,
+  },
+  "pa_updated",
+  {
+    data_type => "datetime",
+    "datetime_undef_if_invalid" => 1,
+    is_nullable => 1,
+  },
+  "pa_owner",
+  { data_type => "integer", is_nullable => 1 },
+  "pa_template",
+  { data_type => "varchar", is_nullable => 1, size => 255 },
+  "pa_change",
+  { data_type => "integer", default_value => 0, is_nullable => 1 },
+  "pa_ge",
+  { data_type => "blob", is_nullable => 1 },
+);
+
+=head1 PRIMARY KEY
+
+=over 4
+
+=item * L</pa_id>
+
+=back
+
+=cut
+
+__PACKAGE__->set_primary_key("pa_id");
+
+
+# Created by DBIx::Class::Schema::Loader v0.07015 @ 2013-01-04 13:20:18
+# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:5hXQzSKXhdlQjvexNpHpDg
+
+
+# You can replace this text with custom code or comments, and it will be preserved on regeneration
+1;

lib/Notice/DB/Result/PageTag.pm

@@ -0,0 +1,95 @@
+use utf8;
+package Notice::DB::Result::PageTag;
+
+# Created by DBIx::Class::Schema::Loader
+# DO NOT MODIFY THE FIRST PART OF THIS FILE
+
+=head1 NAME
+
+Notice::DB::Result::PageTag - which tags to match
+
+=cut
+
+use strict;
+use warnings;
+
+use base 'DBIx::Class::Core';
+
+=head1 TABLE: C<PageTag>
+
+=cut
+
+__PACKAGE__->table("PageTag");
+
+=head1 ACCESSORS
+
+=head2 pt_id
+
+  data_type: 'integer'
+  is_auto_increment: 1
+  is_nullable: 0
+
+=head2 pt_paid
+
+  data_type: 'integer'
+  is_nullable: 0
+
+Pages.pa_id
+
+=head2 pt_ag
+
+  data_type: 'varchar'
+  is_nullable: 1
+  size: 255
+
+page tag id="menu" name="footer"
+
+=head2 pt_order
+
+  data_type: 'integer'
+  extra: {unsigned => 1}
+  is_nullable: 0
+
+if there is a list this determins the order, smallest left/top largest right/bottom
+
+=head2 pt_inc
+
+  data_type: 'integer'
+  is_nullable: 1
+
+do we include this page or just its link
+
+=cut
+
+__PACKAGE__->add_columns(
+  "pt_id",
+  { data_type => "integer", is_auto_increment => 1, is_nullable => 0 },
+  "pt_paid",
+  { data_type => "integer", is_nullable => 0 },
+  "pt_ag",
+  { data_type => "varchar", is_nullable => 1, size => 255 },
+  "pt_order",
+  { data_type => "integer", extra => { unsigned => 1 }, is_nullable => 0 },
+  "pt_inc",
+  { data_type => "integer", is_nullable => 1 },
+);
+
+=head1 PRIMARY KEY
+
+=over 4
+
+=item * L</pt_id>
+
+=back
+
+=cut
+
+__PACKAGE__->set_primary_key("pt_id");
+
+
+# Created by DBIx::Class::Schema::Loader v0.07015 @ 2013-01-04 13:20:18
+# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:6tY4p/e7HgYStIgbJNodow
+
+
+# You can replace this text with custom code or comments, and it will be preserved on regeneration
+1;

t/www/ckeditor/CHANGES.md

@@ -0,0 +1,12 @@
+CKEditor 4 Changelog
+====================
+
+## CKEditor 4.0
+
+The first stable release of the new CKEditor 4 code line.
+
+The CKEditor JavaScript API has been kept compatible with CKEditor 4, whenever
+possible. The list of relevant changes can be found in the [API Changes page of
+the CKEditor 4 documentation][1].
+
+[1]: http://docs.ckeditor.com/#!/guide/dev_api_changes "API Changes""