Ignore:
Timestamp:
Jul 9, 2011, 4:11:45 PM (10 years ago)
Author:
Jason Gross <jgross@mit.edu>
Branches:
master, release-1.8, release-1.9
Children:
176d2c75, 4168fb8, 220db88, 820e852, 4bf2a11, 976e58a
Parents:
efeec7f
git-author:
Jason Gross <jgross@mit.edu> (05/23/11 19:23:05)
git-committer:
Jason Gross <jgross@mit.edu> (07/09/11 16:11:45)
Message:
Improved ability to delete messages from perl

BarnOwl::Message now has a delete_and_expunge command, and
BarnOwl::queue_message returns the queued message, so that deletion
actually works; there used to be no way to get the id of a queued
message, and so ->delete() didn't actually do anything...
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perl/lib/BarnOwl/Message.pm

    rd1ae4a4 ra130fc5  
    8181sub short_personal_context { return ""; }
    8282
     83sub delete_and_expunge {
     84    my ($m) = @_;
     85    &BarnOwl::command("delete-and-expunge --quiet --id " . $m->id);
     86}
     87
    8388sub delete {
    8489    my ($m) = @_;
Note: See TracChangeset for help on using the changeset viewer.