[Jifty-commit] r6105 - in wifty/trunk: etc lib/Wifty

Jifty commits jifty-commit at lists.jifty.org
Sat Dec 13 18:37:00 EST 2008


Author: ruz
Date: Sat Dec 13 18:37:00 2008
New Revision: 6105

Added:
   wifty/trunk/lib/Wifty/Upgrade.pm
Modified:
   wifty/trunk/etc/config.yml
   wifty/trunk/lib/Wifty/Model/Page.pm

Log:
* add created/created_by on Page

Modified: wifty/trunk/etc/config.yml
==============================================================================
--- wifty/trunk/etc/config.yml	(original)
+++ wifty/trunk/etc/config.yml	Sat Dec 13 18:37:00 2008
@@ -10,7 +10,7 @@
     Driver: SQLite
     Host: localhost
     User: postgres
-    Version: 0.0.20
+    Version: 0.0.21
     Password: ''
     RequireSSL: 0
   Plugins:

Modified: wifty/trunk/lib/Wifty/Model/Page.pm
==============================================================================
--- wifty/trunk/lib/Wifty/Model/Page.pm	(original)
+++ wifty/trunk/lib/Wifty/Model/Page.pm	Sat Dec 13 18:37:00 2008
@@ -30,6 +30,14 @@
     refers_to Wifty::Model::User,
     since '0.0.16';
 
+column created =>
+    type is 'timestamp',
+    since '0.0.21';
+
+column created_by =>
+    refers_to Wifty::Model::User,
+    since '0.0.21';
+
 column revisions =>
     refers_to Wifty::Model::RevisionCollection by 'page';
 };
@@ -38,8 +46,9 @@
     my $self = shift;
     my %args = (@_);
     my $now  = DateTime->now();
-    $args{'updated'} = $now->ymd . " " . $now->hms;
-    $args{'updated_by'} = ( $self->current_user? $self->current_user->user_object : undef );
+    $args{'created'} = $args{'updated'} = $now->ymd . " " . $now->hms;
+    $args{'created_by'} = $args{'updated_by'}
+        = $self->current_user? $self->current_user->user_object : undef;
     my ($id) = $self->SUPER::create(%args);
     if ( $self->id ) {
         $self->_add_revision(%args);

Added: wifty/trunk/lib/Wifty/Upgrade.pm
==============================================================================
--- (empty file)
+++ wifty/trunk/lib/Wifty/Upgrade.pm	Sat Dec 13 18:37:00 2008
@@ -0,0 +1,24 @@
+use strict;
+use warnings;
+
+package Wifty::Upgrade;
+
+use base qw(Jifty::Upgrade);
+use Jifty::Upgrade qw( since rename );
+
+since '0.0.21' => sub {
+    my $pages = Wifty::Model::PageCollection->new(
+        current_user => Jifty->app_class('CurrentUser')->superuser
+    );
+    $pages->unlimit;
+
+    while ( my $page = $pages->next ) {
+        my $first_rev = $page->revisions->first;
+        my ($status, $msg) = $page->set_created( $first_rev? $first_rev->created : $page->updated );
+        Jifty->log->error("Couldn't set created:". $msg) unless $status;
+        ($status, $msg) = $page->set_created_by( $first_rev? $first_rev->created_by : $page->updated_by );
+        Jifty->log->error("Couldn't set created_by:". $msg) unless $status;
+    }
+};
+
+1;


More information about the Jifty-commit mailing list