8c/5a9b9b6c05abb81f33a23cd2e16d300fa25f5d

   1 Return-Path: <james@hackervisions.org>\r
   2 X-Original-To: notmuch@notmuchmail.org\r
   3 Delivered-To: notmuch@notmuchmail.org\r
   4 Received: from localhost (localhost [127.0.0.1])\r
   5         by olra.theworths.org (Postfix) with ESMTP id 0EFA6431FAE\r
   6         for <notmuch@notmuchmail.org>; Thu, 25 Feb 2010 06:21:49 -0800 (PST)\r
   7 X-Virus-Scanned: Debian amavisd-new at olra.theworths.org\r
   8 X-Spam-Flag: NO\r
   9 X-Spam-Score: -0.216\r
  10 X-Spam-Level: \r
  11 X-Spam-Status: No, score=-0.216 tagged_above=-999 required=5\r
  12         tests=[AWL=-0.317, BAYES_50=0.001, RDNS_DYNAMIC=0.1] autolearn=no\r
  13 Received: from olra.theworths.org ([127.0.0.1])\r
  14         by localhost (olra.theworths.org [127.0.0.1]) (amavisd-new, port 10024)\r
  15         with ESMTP id roTOtG7IGgmL for <notmuch@notmuchmail.org>;\r
  16         Thu, 25 Feb 2010 06:21:48 -0800 (PST)\r
  17 Received: from hackervisions.org (67-207-143-141.slicehost.net\r
  18         [67.207.143.141])\r
  19         by olra.theworths.org (Postfix) with ESMTP id 9836B431FBF\r
  20         for <notmuch@notmuchmail.org>; Thu, 25 Feb 2010 06:21:48 -0800 (PST)\r
  21 Received: from ool-18bd392a.dyn.optonline.net ([24.189.57.42]\r
  22         helo=wyzanski.hackervisions.org)\r
  23         by hv with esmtpsa (TLS1.0:DHE_RSA_AES_128_CBC_SHA1:16) (Exim 4.69)\r
  24         (envelope-from <james@hackervisions.org>)\r
  25         id 1Nkeb1-0000nN-0p; Thu, 25 Feb 2010 09:21:43 -0500\r
  26 Date: Thu, 25 Feb 2010 09:21:33 -0500\r
  27 Message-ID: <87635ll7ki.wl%james@hackervisions.org>\r
  28 From: James Vasile <james@hackervisions.org>\r
  29 To: "Sebastian Spaeth" <Sebastian@SSpaeth.de>\r
  30 In-Reply-To: <87eik9bn8l.fsf@SSpaeth.de>\r
  31 References:\r
  32  <1161359196.2247691263984967906.JavaMail.root@zimbra1-e1.priv.proxad.net>\r
  33         <87sk8qwjlt.fsf@yoom.home.cworth.org>\r
  34         <87tyt61mrl.fsf@servo.finestructure.net>        <87eik9bn8l.fsf@SSpaeth.de>\r
  35 X-Mailer: Wanderlust/2.15.6\r
  36 User-Agent: SEMI/1.14.6 (Maruoka) FLIM/1.14.9 (=?UTF-8?B?R29qxY0=?=)\r
  37         APEL/10.7 Emacs/23.1 (i486-pc-linux-gnu) MULE/6.0 (HANACHIRUSATO)\r
  38 MIME-Version: 1.0 (generated by SEMI 1.14.6 - "Maruoka")\r
  39 Content-Type: text/plain; charset=US-ASCII\r
  40 Cc: notmuch <notmuch@notmuchmail.org>\r
  41 Subject: Re: [notmuch] [PATCH] add notmuch-show-delete keybinding 'd'\r
  42 X-BeenThere: notmuch@notmuchmail.org\r
  43 X-Mailman-Version: 2.1.13\r
  44 Precedence: list\r
  45 List-Id: "Use and development of the notmuch mail system."\r
  46         <notmuch.notmuchmail.org>\r
  47 List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,\r
  48         <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
  49 List-Archive: <http://notmuchmail.org/pipermail/notmuch>\r
  50 List-Post: <mailto:notmuch@notmuchmail.org>\r
  51 List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
  52 List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,\r
  53         <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
  54 X-List-Received-Date: Thu, 25 Feb 2010 14:21:49 -0000\r
  55 \r
  56 At Thu, 25 Feb 2010 11:53:14 +0100,\r
  57 Sebastian Spaeth wrote:\r
  58 > \r
  59 > On Wed, 24 Feb 2010 14:01:18 -0500, Jameson Rollins <jrollins@finestructure.net> wrote:\r
  60 > > > 2. It removes the "inbox" and "unread" tags while adding the tag to\r
  61 > > >    indicate deletion.\r
  62 > > \r
  63 > > Hey, Carl.  Why is this last point important? [...]Why should it modify any other\r
  64 > > tags?  A message/thread should be allowed to be both deleted and in the\r
  65 > > inbox.\r
  66 > \r
  67 > As long as deleted threads/messages show up in the default views, I\r
  68 > don't want them to show up in my inbox or show up as unread. I agree\r
  69 > that it might be possible to have "unread" yet "delete"d emails. But in\r
  70 > reality, if I delete a message I don't want it to pop up in my inbox.\r
  71 > \r
  72 > Feel free to apply patches however you want though, thanks to emacs,\r
  73 > I'll be able to get my desired behavior nonetheless :).\r
  74 > \r
  75 > > As for "unread", I think that should be handled by actually reading the\r
  76 > > message, not by manually applying a state to it.\r
  77 > \r
  78 > I agree, but deleting a message in my world view resets the unread tag\r
  79 > (as in, I don't want to read it anymore).\r
  80 \r
  81 This elisp might help.  I run these when deleting messages in search\r
  82 or show modes.  Basically, this means I never see deleted threads\r
  83 again.  I also use these to mark spam.\r
  84 \r
  85 (defun notmuch-tags-strip-properties (tags)\r
  86   "return list of tags with emacs text properties removed\r
  87 \r
  88 tags is a list of tags where each tag is a string with emacs text\r
  89 properties\r
  90 "\r
  91   (mapcar '(lambda (tag)\r
  92             (set-text-properties 0 (length tag) nil tag)\r
  93             tag)\r
  94           tags))\r
  95 \r
  96 (defun notmuch-show-remove-all-tags ()\r
  97   "Remove all tags from the currently selected thread."\r
  98   (apply 'notmuch-show-remove-tag\r
  99          (notmuch-tags-strip-properties (notmuch-show-get-tags))))\r
 100 \r
 101 (defun notmuch-search-remove-tags (&rest tags)\r
 102   "Remove multiple tags from the currently selected thread."\r
 103   (mapc 'notmuch-search-remove-tag tags))\r
 104 \r
 105 (defun notmuch-search-remove-all-tags ()\r
 106   "Remove all tags from the currently selected thread."\r
 107   (apply 'notmuch-search-remove-tags\r
 108          (notmuch-tags-strip-properties (notmuch-search-get-tags))))\r