From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: Bug: / RET filter no longer auto-excludes FILETAGS [6.33trans (release_6.33f.34.gf806)] Date: Thu, 26 Nov 2009 07:02:00 +0100 Message-ID: References: <200911251854.nAPIsQjM001980@gollum.intra.norang.ca> Mime-Version: 1.0 (Apple Message framework v936) Content-Type: text/plain; charset=US-ASCII; format=flowed; delsp=yes Content-Transfer-Encoding: 7bit Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1NDXQf-0007cs-6H for emacs-orgmode@gnu.org; Thu, 26 Nov 2009 01:02:09 -0500 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1NDXQa-0007aV-7m for emacs-orgmode@gnu.org; Thu, 26 Nov 2009 01:02:08 -0500 Received: from [199.232.76.173] (port=55923 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1NDXQa-0007aP-0b for emacs-orgmode@gnu.org; Thu, 26 Nov 2009 01:02:04 -0500 Received: from mail-ew0-f224.google.com ([209.85.219.224]:49074) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1NDXQZ-0001Yl-Cl for emacs-orgmode@gnu.org; Thu, 26 Nov 2009 01:02:03 -0500 Received: by ewy24 with SMTP id 24so456429ewy.26 for ; Wed, 25 Nov 2009 22:02:02 -0800 (PST) In-Reply-To: <200911251854.nAPIsQjM001980@gollum.intra.norang.ca> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Bernt Hansen Cc: emacs-orgmode@gnu.org On Nov 25, 2009, at 7:54 PM, Bernt Hansen wrote: > > Remember to cover the basics, that is, what you expected to happen and > what in fact did happen. You don't know how to make a good report? > See > > http://orgmode.org/manual/Feedback.html#Feedback > > Your bug report will be posted to the Org-mode mailing list. > ------------------------------------------------------------------------ > > I have a function that excludes tasks in the agenda using / RET > (auto-exclude.) This works in release_6.33f but is broken on the > current master. > > One of the following commits breaks it: > > There are only 'skip'ped commits left to test. > The first bad commit could be any of: > c6186f49b361dcb2ef05bf769c9abf80307bd658 > 1a0e1a6f07303aa935a643863c7cb85264e73481 > > Excluding tasks by FILETAGS only breaks for me. > > The tag 'MARK' is a > > #+FILETAGS: MARK > > entry only in mark.org. Auto Exclusion of the MARK tag no longer > works with the current master. > > My auto exclude functions are inline below: > > -Bernt > > --8<---------------cut here---------------start------------->8--- > (defun bh/weekday-p () > (let ((wday (nth 6 (decode-time)))) > (and (< wday 6) > (> wday 0)))) > > (defun bh/working-p () > (let ((hour (nth 2 (decode-time)))) > (and (bh/weekday-p) > (or (and (>= hour 8) (<= hour 11)) > (and (>= hour 13) (<= hour 16)))))) > > (defun bh/mark-p () > (let ((hour (nth 2 (decode-time)))) > (or (and (bh/weekday-p) > (or (= hour 8) > (and (>= hour 16) (<= hour 20)))) > (and (not (bh/weekday-p)) > (>= hour 9) > (<= hour 20))))) > > (defun bh/org-auto-exclude-function (tag) > (and (cond > ((string= tag "@home") > (bh/working-p)) > ((string= tag "@office") > (not (bh/working-p))) > ((string= tag "MARK") > (not (bh/mark-p))) > ((or (string= tag "@errand") (string= tag "PHONE")) > (let ((hour (nth 2 (decode-time)))) > (or (< hour 8) (> hour 21))))) > (concat "-" tag))) > > (setq org-agenda-auto-exclude-function 'bh/org-auto-exclude-function) Hi Bernt, do you get it back to when when replacing "MARK" with "mark" and "PHONE" wiht "phone"? - Carsten