From mboxrd@z Thu Jan 1 00:00:00 1970 From: David O'Toole Subject: orgstruct-mode error Date: Sat, 25 Aug 2007 18:48:18 -0400 Message-ID: Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1IP4Qd-0006zL-Eo for emacs-orgmode@gnu.org; Sat, 25 Aug 2007 18:48:27 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1IP4Qc-0006z0-0j for emacs-orgmode@gnu.org; Sat, 25 Aug 2007 18:48:27 -0400 Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1IP4Qb-0006yx-JZ for emacs-orgmode@gnu.org; Sat, 25 Aug 2007 18:48:25 -0400 Received: from wx-out-0506.google.com ([66.249.82.226]) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1IP4Qb-0002RT-7D for emacs-orgmode@gnu.org; Sat, 25 Aug 2007 18:48:25 -0400 Received: by wx-out-0506.google.com with SMTP id s7so1087726wxc for ; Sat, 25 Aug 2007 15:48:24 -0700 (PDT) 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: emacs-orgmode@gnu.org I am using org 5.05 and get this error when doing org-cycle in an emacs-lisp-mode buffer (with Orgstruct mode on) > Debugger entered--Lisp error: (wrong-type-argument stringp nil) > re-search-forward(nil 6690 t) > org-cycle-hide-drawers(contents) > run-hook-with-args(org-cycle-hide-drawers contents) > org-cycle(t) > org-cycle-global() > call-interactively(org-cycle-global) > recursive-edit() > byte-code("=C3=86 @=C3=87=3D!=C3=88=C3=89=C3=8A\"=C3=8B=C3=89!=1AA@)=C2= =A2=C3=8C=3D!=C3=88=C3=8D=C3=8A\"=C3=8E=0B!=C3=8F =C3=90 !\fc=C3=91ed\"VWeb= =C3=92=C2=A5y`=1Bdb=C3=92=C2=A5Zy=0E`|)=C3=93ceb=C3=94=C3=95=C3=96 \"=C3=97= =C3=94=C3=98!=C3=99=C3=8A=1C=1D=C3=94=C3=98!=C2=8A=C3=9A +=C3=99" [unread-= command-char debugger-args x debugger-buffer noninteractive debugger-batch-= max-lines -1 debug backtrace-debug 4 t backtrace-frame lambda 5 pop-to-buff= er debugger-mode debugger-setup-buffer count-lines 2 "...\n" message "%s" b= uffer-string kill-emacs "" nil recursive-edit middlestart buffer-read-only = standard-output] 4) > debug(error (wrong-type-argument stringp nil)) > re-search-forward(nil 6690 t) > org-cycle-hide-drawers(contents) > run-hook-with-args(org-cycle-hide-drawers contents) > org-cycle(t) > org-cycle-global() > call-interactively(org-cycle-global) Here is the code I use to set up the buffer: ;; global consistent org cycling keys (defun org-cycle-global () (interactive) (org-cycle t)) (defun org-cycle-local () (interactive) (save-excursion (move-beginning-of-line nil) (org-cycle))) (global-set-key (kbd "M-[") 'org-cycle-global) (global-set-key (kbd "M-]") 'org-cycle-local) (add-hook 'emacs-lisp-mode-hook #'orgstruct-mode) ;;;; Fontifying todo items outside of org-mode (defface todo-comment-face '((t (:background "red" :foreground "yellow" :we= ight bold :bold t))) "Face for TODO in code buffers.") (defvar todo-comment-face 'todo-comment-face) (defun fontify-todo ()=20 (font-lock-add-keywords nil '(("\\<\\(TODO\\)\\>"=20 (1 todo-comment-face t))))) (add-hook 'emacs-lisp-mode-hook #'fontify-todo) (defface headline-face '((t (:foreground "white" :underline "white" :backgr= ound "navyblue"))) "Face for headlines.") (defvar headline-face 'headline-face) (defun fontify-headline ()=20 (font-lock-add-keywords nil '(("^;;;;* \\(.*\\)\\>"=20 (1 headline-face t))))) (add-hook 'emacs-lisp-mode-hook #'fontify-headline) --=20 David O'Toole=20 dto@gnu.org http://dto.freeshell.org/notebook/