diff options
author | Yorhel <git@yorhel.nl> | 2008-11-26 14:38:21 +0100 |
---|---|---|
committer | Yorhel <git@yorhel.nl> | 2008-11-26 14:38:21 +0100 |
commit | 28169946d608f6a24ebf31adf4afbb8be69f7fac (patch) | |
tree | f409ab24cb6a8deda02e0614551ba04d0cc05d2c /lib | |
parent | 16fe3375acf9eb17f519afd903ca07c6b9074e51 (diff) |
All db*(Edit|add) functions accept an uid option, reverse relation updates go to Multi again
Diffstat (limited to 'lib')
-rw-r--r-- | lib/VNDB/DB/Misc.pm | 10 | ||||
-rw-r--r-- | lib/VNDB/DB/Producers.pm | 8 | ||||
-rw-r--r-- | lib/VNDB/DB/VN.pm | 8 |
3 files changed, 13 insertions, 13 deletions
diff --git a/lib/VNDB/DB/Misc.pm b/lib/VNDB/DB/Misc.pm index d8348e71..5b810583 100644 --- a/lib/VNDB/DB/Misc.pm +++ b/lib/VNDB/DB/Misc.pm @@ -32,7 +32,7 @@ sub dbStats { # Arguments: type [0..2], item ID, edit summary # Returns: local revision, global revision sub dbRevisionInsert { - my($self, $type, $iid, $editsum) = @_; + my($self, $type, $iid, $editsum, $uid) = @_; my $table = [qw|vn releases producers|]->[$type]; @@ -47,7 +47,7 @@ sub dbRevisionInsert { LIMIT 1 )) RETURNING id, rev|, - $type, $self->authInfo->{id}, $self->reqIP, $editsum, + $type, $uid||$self->authInfo->{id}, $self->reqIP, $editsum, $table, [qw|v r p|]->[$type], $iid ); @@ -59,16 +59,16 @@ sub dbRevisionInsert { # Comparable to RevisionInsert, but creates a new item with a corresponding # change. Same things about inconsistent state, etc. -# Argumments: type [0..2], edit summary +# Argumments: type [0..2], edit summary, [uid] # Returns: item id, global revision sub dbItemInsert { - my($self, $type, $editsum) = @_; + my($self, $type, $editsum, $uid) = @_; my $cid = $self->dbRow(q| INSERT INTO changes (type, requester, ip, comments) VALUES (?, ?, ?, ?) RETURNING id|, - $type, $self->authInfo->{id}, $self->reqIP, $editsum + $type, $uid||$self->authInfo->{id}, $self->reqIP, $editsum )->{id}; my $iid = $self->dbRow(q| diff --git a/lib/VNDB/DB/Producers.pm b/lib/VNDB/DB/Producers.pm index 99989d80..adfa8b1c 100644 --- a/lib/VNDB/DB/Producers.pm +++ b/lib/VNDB/DB/Producers.pm @@ -79,21 +79,21 @@ sub dbProducerGet { } -# arguments: id, %options ->( editsum + insert_rev ) +# arguments: id, %options ->( editsum uid + insert_rev ) # returns: ( local revision, global revision ) sub dbProducerEdit { my($self, $pid, %o) = @_; - my($rev, $cid) = $self->dbRevisionInsert(2, $pid, $o{editsum}); + my($rev, $cid) = $self->dbRevisionInsert(2, $pid, $o{editsum}, $o{uid}); insert_rev($self, $cid, $pid, \%o); return ($rev, $cid); } -# arguments: %options ->( editsum + insert_rev ) +# arguments: %options ->( editsum uid + insert_rev ) # returns: ( item id, global revision ) sub dbProducerAdd { my($self, %o) = @_; - my($pid, $cid) = $self->dbItemInsert(2, $o{editsum}); + my($pid, $cid) = $self->dbItemInsert(2, $o{editsum}, $o{uid}); insert_rev($self, $cid, $pid, \%o); return ($pid, $cid); } diff --git a/lib/VNDB/DB/VN.pm b/lib/VNDB/DB/VN.pm index e4167067..85bce0d5 100644 --- a/lib/VNDB/DB/VN.pm +++ b/lib/VNDB/DB/VN.pm @@ -142,21 +142,21 @@ sub dbVNGet { } -# arguments: id, %options ->( editsum + insert_rev ) +# arguments: id, %options ->( editsum uid + insert_rev ) # returns: ( local revision, global revision ) sub dbVNEdit { my($self, $id, %o) = @_; - my($rev, $cid) = $self->dbRevisionInsert(0, $id, $o{editsum}); + my($rev, $cid) = $self->dbRevisionInsert(0, $id, $o{editsum}, $o{uid}); insert_rev($self, $cid, $id, \%o); return ($rev, $cid); } -# arguments: %options ->( editsum + insert_rev ) +# arguments: %options ->( editsum uid + insert_rev ) # returns: ( item id, global revision ) sub dbVNAdd { my($self, %o) = @_; - my($id, $cid) = $self->dbItemInsert(0, $o{editsum}); + my($id, $cid) = $self->dbItemInsert(0, $o{editsum}, $o{uid}); insert_rev($self, $cid, $id, \%o); return ($id, $cid); } |