summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2008-11-26 14:38:21 +0100
committerYorhel <git@yorhel.nl>2008-11-26 14:38:21 +0100
commit28169946d608f6a24ebf31adf4afbb8be69f7fac (patch)
treef409ab24cb6a8deda02e0614551ba04d0cc05d2c /lib
parent16fe3375acf9eb17f519afd903ca07c6b9074e51 (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.pm10
-rw-r--r--lib/VNDB/DB/Producers.pm8
-rw-r--r--lib/VNDB/DB/VN.pm8
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);
}