From mboxrd@z Thu Jan 1 00:00:00 1970 From: =?ISO-8859-1?Q?Andreas_R=F6hler?= Subject: Re: (no subject) Date: Fri, 08 Mar 2013 14:00:20 +0100 Message-ID: <5139E0E4.6090907@easy-emacs.de> References: <8738w7c5fh.fsf@gmail.com> <5139BFD6.1080401@easy-emacs.de> <87r4jqf9ub.fsf@bzg.ath.cx> <5139C48E.6080305@easy-emacs.de> <87mwuef8yo.fsf@bzg.ath.cx> <5139C917.7030402@easy-emacs.de> <87ehfqf837.fsf@bzg.ath.cx> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="------------030601000002060503060607" Return-path: Received: from eggs.gnu.org ([208.118.235.92]:42355) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UDwth-0000Gb-Qi for emacs-orgmode@gnu.org; Fri, 08 Mar 2013 07:59:46 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1UDwtd-0007XQ-Bt for emacs-orgmode@gnu.org; Fri, 08 Mar 2013 07:59:41 -0500 Received: from moutng.kundenserver.de ([212.227.17.9]:52967) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UDwtd-0007XH-2S for emacs-orgmode@gnu.org; Fri, 08 Mar 2013 07:59:37 -0500 In-Reply-To: <87ehfqf837.fsf@bzg.ath.cx> 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: Bastien Cc: emacs-orgmode@gnu.org This is a multi-part message in MIME format. --------------030601000002060503060607 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 8bit Am 08.03.2013 12:23, schrieb Bastien: > Andreas Röhler writes: > >> IMHO remains to make that buffer-local and use outline-regexp from >> inside org-mode. > > Have a go and let us know :) > That should work already - to start with. --------------030601000002060503060607 Content-Type: text/x-patch; name="org-heading-char.patch" Content-Transfer-Encoding: 7bit Content-Disposition: attachment; filename="org-heading-char.patch" commit 8cf6bc6faeb2a3b3fec0780e56a04ef0e13c3c62 Author: Andreas Roehler Date: Fri Mar 8 13:58:13 2013 +0100 Enable different heading chars, not just `*' Use variable `org-heading-char', customizable later on, instead of hard-coded `*' TINYCHANGE diff --git a/lisp/org.el b/lisp/org.el index 811506a..2db63ae 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -90,13 +90,17 @@ ;; `org-outline-regexp'. The only function still directly relying on ;; `outline-regexp' is `org-overview' so that `org-cycle' can do its ;; job when `orgstruct-mode' is active. +(defvar org-heading-char "*") + (defvar org-outline-regexp "\\*+ " "Regexp to match Org headlines.") +(setq org-outline-regexp (concat (regexp-quote org-heading-char) "+ ")) (defvar org-outline-regexp-bol "^\\*+ " "Regexp to match Org headlines. This is similar to `org-outline-regexp' but additionally makes sure that we are at the beginning of the line.") +(setq org-outline-regexp-bol (concat "^" (regexp-quote org-heading-char) "+ ")) (defvar org-heading-regexp "^\\(\\*+\\)\\(?: +\\(.*?\\)\\)?[ \t]*$" "Matches a headline, putting stars and text into groups. --------------030601000002060503060607--