From mboxrd@z Thu Jan 1 00:00:00 1970 From: marcowahlsoft@gmail.com Subject: [PATCH][mini] bulk-mark-regexp and -toggle also with time grid Date: Thu, 18 Sep 2014 20:03:05 +0200 Message-ID: <84vbok957q.fsf@tm6592.fritz.box> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:57750) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XUg3G-0003EK-Vb for emacs-orgmode@gnu.org; Thu, 18 Sep 2014 14:03:37 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1XUg3B-0001vd-6Q for emacs-orgmode@gnu.org; Thu, 18 Sep 2014 14:03:30 -0400 Received: from plane.gmane.org ([80.91.229.3]:33276) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XUg3B-0001tu-0F for emacs-orgmode@gnu.org; Thu, 18 Sep 2014 14:03:25 -0400 Received: from list by plane.gmane.org with local (Exim 4.69) (envelope-from ) id 1XUg33-0003n0-4B for emacs-orgmode@gnu.org; Thu, 18 Sep 2014 20:03:17 +0200 Received: from stgt-5f70249a.pool.mediaways.net ([95.112.36.154]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Thu, 18 Sep 2014 20:03:17 +0200 Received: from marcowahlsoft by stgt-5f70249a.pool.mediaways.net with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Thu, 18 Sep 2014 20:03:17 +0200 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org --=-=-= Content-Type: text/plain Hi! >From the documentation for * in an agenda-buffer (C-h k *): --8<---------------cut here---------------start------------->8--- * runs the command org-agenda-bulk-mark-all (found in org-agenda-mode-map), which is an interactive compiled Lisp function in `org-agenda.el'. It is bound to *, . (org-agenda-bulk-mark-all) Mark all entries for future agenda bulk action. --8<---------------cut here---------------end--------------->8--- Currently this is not true if there is a time grid in the agenda buffer. --8<---------------cut here---------------start------------->8--- G runs the command org-agenda-toggle-time-grid (found in... --8<---------------cut here---------------end--------------->8--- Please consider to apply the attached patch. Ciao, Marco -- http://www.wahlzone.de PGP: 0x0A3AE6F2 --=-=-= Content-Type: text/x-diff Content-Disposition: inline; filename=bulk-multi-marking-with-time-grid.patch Content-Description: bulk-mark regexp and toggle also with time grid diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index dbc9861..c8808e5 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -9680,7 +9680,7 @@ This is a command that has to be installed in `calendar-mode-map'." (overlay-put ov 'type 'org-marked-entry-overlay)) (end-of-line 1) (or (ignore-errors - (goto-char (next-single-property-change (point) 'txt))) + (goto-char (next-single-property-change (point) 'org-hd-marker))) (beginning-of-line 2)) (while (and (get-char-property (point) 'invisible) (not (eobp))) (beginning-of-line 2)) @@ -9734,7 +9734,7 @@ This is a command that has to be installed in `calendar-mode-map'." (save-excursion (goto-char (point-min)) (while (ignore-errors - (goto-char (next-single-property-change (point) 'txt))) + (goto-char (next-single-property-change (point) 'org-hd-marker))) (org-agenda-bulk-toggle)))) (defun org-agenda-bulk-toggle () --=-=-=--