From mboxrd@z Thu Jan 1 00:00:00 1970 From: Samuel Wales Subject: Re: Protecting comment lines from fill-paragraph Date: Mon, 27 Apr 2009 19:34:13 -0700 Message-ID: <20524da70904271934t1c7ec552uf3efd02731487ee2@mail.gmail.com> References: <87ocumm3cg.fsf@fastmail.fm> <20524da70904241201l5cb049bfo134872bc78b20aa2@mail.gmail.com> Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 7bit Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Lyd9c-0000xT-7H for emacs-orgmode@gnu.org; Mon, 27 Apr 2009 22:34:40 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1Lyd9X-0000u1-H6 for emacs-orgmode@gnu.org; Mon, 27 Apr 2009 22:34:39 -0400 Received: from [199.232.76.173] (port=46591 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Lyd9X-0000tp-Ar for emacs-orgmode@gnu.org; Mon, 27 Apr 2009 22:34:35 -0400 Received: from rv-out-0708.google.com ([209.85.198.244]:5908) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1Lyd9W-0006H5-OL for emacs-orgmode@gnu.org; Mon, 27 Apr 2009 22:34:35 -0400 Received: by rv-out-0708.google.com with SMTP id f25so233909rvb.6 for ; Mon, 27 Apr 2009 19:34:33 -0700 (PDT) In-Reply-To: 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: Matthew Lundin Cc: Org Mode Mailing List Try this. It modifies only a few lines from the original. (require 'filladapt) (setq filladapt-token-table '( ;; this must be first ("^" beginning-of-line) ;; Included text in news or mail replies (">+" citation->) ;; Included text generated by SUPERCITE. We can't hope to match all ;; the possible variations, your mileage may vary. ("\\(\\w\\|[0-9]\\)[^'`\"< \t\n]*>[ \t]*" supercite-citation) ;; Lisp comments (";+" lisp-comment) ;; UNIX shell comments ("#+" sh-comment) ;; Postscript comments ("%+" postscript-comment) ;; C++ comments ("///*" c++-comment) ;; Texinfo comments ("@c[ \t]" texinfo-comment) ("@comment[ \t]" texinfo-comment) ;; Bullet types. ;; ;; LaTex \item ;; ("\\\\item[ \t]" bullet) ;; ;; 1. xxxxx ;; xxxxx ;; ("^[ ]+[0-9]+\\.[ \t]" bullet) ;; ;; 2.1.3 xxxxx xx x xx x ;; xxx ;; ("^[ ]+[0-9]+\\(\\.[0-9]+\\)+[ \t]" bullet) ;; ;; a. xxxxxx xx ;; xxx xxx ;; ("^[ ]+[A-Za-z]\\.[ \t]" bullet) ;; ;; 1) xxxx x xx x xx or (1) xx xx x x xx xx ;; xx xx xxxx xxx xx x x xx x ;; ("^[ ]+(?[0-9]+)[ \t]" bullet) ;; ;; a) xxxx x xx x xx or (a) xx xx x x xx xx ;; xx xx xxxx xxx xx x x xx x ;; ("^[ ]+(?[A-Za-z])[ \t]" bullet) ;; ;; 2a. xx x xxx x x xxx ;; xxx xx x xx x ;; ("^[ ]+[0-9]+[A-Za-z]\\.[ \t]" bullet) ;; ;; 1a) xxxx x xx x xx or (1a) xx xx x x xx xx ;; xx xx xxxx xxx xx x x xx x ;; ("^[ ]+(?[0-9]+[A-Za-z])[ \t]" bullet) ;; ;; - xx xxx xxxx or * xx xx x xxx xxx ;; xxx xx xx x xxx x xx x x x ;; ("^[ ]+[-~*+]+[ \t]" bullet) ;; ;; o xx xxx xxxx xx x xx xxx x xxx xx x xxx ;; xxx xx xx ;; ("^[ ]+o[ \t]" bullet) ;; don't touch ("[ \t]+" space) ("$" end-of-line) )) This, which makes the regexps more strict, has worked for me for a long time, so I think it's fairly safe to include in filladapt or on worg. HTH -- Myalgic encephalomyelitis denialism is causing death and severe suffering worse than MS. Conflicts of interest are destroying science. Anybody can get the disease at any time permanently. Do science and justice matter to you? http://www.meactionuk.org.uk/What_Is_ME_What_Is_CFS.htm