diff options
author | Eric Wong <e@80x24.org> | 2021-05-21 10:28:30 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2021-05-23 01:33:05 +0000 |
commit | 4420ed836691b94d14c79127990aba27673759eb (patch) | |
tree | ddd5aaf9f8b22b06e9ff497d6831459df7d99dc9 /lib/PublicInbox/LeiMailSync.pm | |
parent | 084dbf65370806af408586603dbc893d3d5cf9bc (diff) | |
download | public-inbox-4420ed836691b94d14c79127990aba27673759eb.tar.gz |
IMAP will eventually be supported.
Diffstat (limited to 'lib/PublicInbox/LeiMailSync.pm')
-rw-r--r-- | lib/PublicInbox/LeiMailSync.pm | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/lib/PublicInbox/LeiMailSync.pm b/lib/PublicInbox/LeiMailSync.pm index 3bada42d..32e17c65 100644 --- a/lib/PublicInbox/LeiMailSync.pm +++ b/lib/PublicInbox/LeiMailSync.pm @@ -138,6 +138,16 @@ DELETE FROM blob2num WHERE fid = ? AND uid = ? $sth->execute($fid, $id); } +# Maildir-only +sub mv_src { + my ($self, $folder, $oidbin, $id, $newbn) = @_; + my $fid = $self->{fmap}->{$folder} //= _fid_for($self, $folder, 1); + my $sth = $self->{dbh}->prepare_cached(<<''); +UPDATE blob2name SET name = ? WHERE fid = ? AND oidbin = ? AND name = ? + + $sth->execute($newbn, $fid, $oidbin, $$id); +} + # read-only, iterates every oidbin + UID or name for a given folder sub each_src { my ($self, $folder, $cb, @args) = @_; |