Gray Calhoun <address@hidden> writes:
Hi Gray,
Is there a way for users to easily replace the leading stars with
another symbol? In particular, I want to replace the '*' with '#' so
that I use org mode to write pseduocode for R in outline form -- R
uses # to designate comments and this would ensure that the headers
wouldn't be read as code.
I guess you want to use `orgstruct-mode' in R files, right? I also
had
the idea to do that, but till now I failed. As a workaround I use
`outline-minor-mode' and set the `outline-regexp' to <comment-
character
of the language><one-or-many-stars>.
Here's the code from my .emacs.
--8<---------------cut here---------------start------------->8---
(defun th-outline-regexp ()
"Calculate the outline regexp for the current mode."
(let ((comment-starter (replace-regexp-in-string
"[[:space:]]+" "" comment-start)))
(when (string= comment-start ";")
(setq comment-starter ";;"))
(concat "^" comment-starter "\\*+")))
(defun th-outline-minor-mode-init ()
(interactive)
(setq outline-regexp (th-outline-regexp)))
(add-hook 'outline-minor-mode-hook
'th-outline-minor-mode-init)
--8<---------------cut here---------------end--------------->8---
I wonder if I cannot make `orgstruct-mode' work the same way. I've
always thought that it uses `outline-regexp' for the cycling and
stuff,
but maybe I'm wrong. What's the correct regexp that's used for
`org-cycle'? `org-complex-heading-regexp'?