Bug in latest version?

* Bug in latest version?
@ 2010-06-28 14:24 Sébastien Vauban
  2010-06-28 14:33 ` Giovanni Ridolfi
  2010-06-29  9:49 ` Carsten Dominik
  0 siblings, 2 replies; 4+ messages in thread
From: Sébastien Vauban @ 2010-06-28 14:24 UTC (permalink / raw)
  To: emacs-orgmode-mXXj517/zsQ

Hello,

I just updated my Org (git version).

I may have made a mistake somewhere else, but I think there is a bug
introduced recently:

--8<---------------cut here---------------start------------->8---
Debugger entered--Lisp error: (wrong-type-argument listp "* Letters")
  car("* Letters")
  mapcar(car ("* Letters" "** Latin" ("Agrave" "\\`{A}" nil "&Agrave;" "A" "À" "À") ("agrave" "\\`{a}" nil "&agrave;" "a" "à" "à") ("Aacute" "\\'{A}" nil "&Aacute;" "A" "Á" "Á") ("aacute" "\\'{a}" nil "&aacute;" "a" "á" "á") ("Acirc" "\\^{A}" nil "&Acirc;" "A" "Â" "Â") ("acirc" "\\^{a}" nil "&acirc;" "a" "â" "â") ("Atilde" "\\~{A}" nil "&Atilde;" "A" "Ã" "Ã") ("atilde" "\\~{a}" nil "&atilde;" "a" "ã" "ã") ("Auml" "\\\"{A}" nil "&Auml;" "Ae" "Ä" "Ä") ("auml" "\\\"{a}" nil "&auml;" "ae" "ä" "ä") ("Aring" "\\AA{}" nil "&Aring;" "A" "Å" "Å") ("AA" "\\AA{}" nil "&Aring;" "A" "Å" "Å") ("aring" "\\aa{}" nil "&aring;" "a" "å" "å") ("AElig" "\\AE{}" nil "&AElig;" "AE" "Æ" "Æ") ("aelig" "\\ae{}" nil "&aelig;" "ae" "æ" "æ") ("Ccedil" "\\c{C}" nil "&Ccedil;" "C" "Ç" "Ç") ("ccedil" "\\c{c}" nil "&ccedil;" "c" "ç" "ç") ("Egrave" "\\`{E}" nil "&Egrave;" "E" "È" "È") ("egrave" "\\`{e}" nil "&egrave;" "e" "è" "è") ("Eacute" "\\'{E}" nil "&Eacute;" "E" "É" "É") ("eacute" "\\'{e}" nil "&eacute;" "e" "é" "é") ("Ecirc" "\\^{E}" nil "&Ecirc;" "E" "Ê" "Ê") ("ecirc" "\\^{e}" nil "&ecirc;" "e" "ê" "ê") ("Euml" "\\\"{E}" nil "&Euml;" "E" "Ë" "Ë") ("euml" "\\\"{e}" nil "&euml;" "e" "ë" "ë") ("Igrave" "\\`{I}" nil "&Igrave;" "I" "Ì" "Ì") ("igrave" "\\`{i}" nil "&igrave;" "i" "ì" "ì") ("Iacute" "\\'{I}" nil "&Iacute;" "I" "Í" "Í") ("iacute" "\\'{i}" nil "&iacute;" "i" "í" "í") ("Icirc" "\\^{I}" nil "&Icirc;" "I" "Î" "Î") ("icirc" "\\^{i}" nil "&icirc;" "i" "î" "î") ("Iuml" "\\\"{I}" nil "&Iuml;" "I" "Ï" "Ï") ("iuml" "\\\"{i}" nil "&iuml;" "i" "ï" "ï") ("Ntilde" "\\~{N}" nil "&Ntilde;" "N" "Ñ" "Ñ") ("ntilde" "\\~{n}" nil "&ntilde;" "n" "ñ" "ñ") ("Ograve" "\\`{O}" nil "&Ograve;" "O" "Ò" "Ò") ("ograve" "\\`{o}" nil "&ograve;" "o" "ò" "ò") ("Oacute" "\\'{O}" nil "&Oacute;" "O" "Ó" "Ó") ("oacute" "\\'{o}" nil "&oacute;" "o" "ó" "ó") ("Ocirc" "\\^{O}" nil "&Ocirc;" "O" "Ô" "Ô") ("ocirc" "\\^{o}" nil "&ocirc;" "o" "ô" "ô") ("Otilde" "\\~{O}" nil "&Otilde;" "O" "Õ" "Õ") ("otilde" "\\~{o}" nil "&otilde;" "o" "õ" "õ") ("Ouml" "\\\"{O}" nil "&Ouml;" "Oe" "Ö" "Ö") ("ouml" "\\\"{o}" nil "&ouml;" "oe" "ö" "ö") ("Oslash" "\\O" nil "&Oslash;" "O" "Ø" "Ø") ("oslash" "\\o{}" nil "&oslash;" "o" "ø" "ø") ("OElig" "\\OE{}" nil "&OElig;" "OE" "OE" "Œ") ...))
  org-compute-latex-and-specials-regexp()
  org-set-regexps-and-options()
  org-mode()
  org-get-local-variables()
  orgstruct-setup()
  orgstruct-mode(1)
  turn-on-orgstruct()
  (progn (turn-on-orgtbl) (turn-on-orgstruct) (turn-on-orgstruct++))
  (if (locate-library "org.el") (progn (turn-on-orgtbl) (turn-on-orgstruct) (turn-on-orgstruct++)))
  (when (locate-library "org.el") (turn-on-orgtbl) (turn-on-orgstruct) (turn-on-orgstruct++))
  my-message-mode-hook()
  run-hooks(text-mode-hook message-mode-hook)
  apply(run-hooks (text-mode-hook message-mode-hook))
  run-mode-hooks(message-mode-hook)
  message-mode()
  message-pop-to-buffer("*mail*" nil)
  message-mail()
  gnus-group-mail(nil)
  call-interactively(gnus-group-mail nil nil)
--8<---------------cut here---------------end--------------->8---

That's what I got when trying to compose a new mail in Gnus.

Adding `-XXX' in the `locate-library' below temporarily fixes the problem.

--8<---------------cut here---------------start------------->8---
;; operates on messages you send
(defun my-message-mode-hook ()

;;;   ;; prompt for and insert a mail alias
;;;   (local-set-key (kbd "M-a") 'mail-abbrev-insert-alias)

  ;; tab completion for alias in `.mailrc'
  (local-set-key (kbd "M-TAB") 'mail-abbrev-complete-alias)

  ;; enable automatic word-wrap when composing messages
  (setq fill-column 78)
  (turn-on-auto-fill)

  ;; footnote
  (footnote-mode)
  (setq footnote-spaced-footnotes nil)
  (setq footnote-section-tag "")
  (setq footnote-style 'latin)

  (when (locate-library "org.el-XXX")

    ;; turn on the `org-mode' table editor
    (turn-on-orgtbl)

    ;; turn on orgstruct-mode
    (turn-on-orgstruct)

    ;; turn on the enhanced version of orgstruct-mode
    (turn-on-orgstruct++)))

(add-hook 'message-mode-hook 'my-message-mode-hook)
--8<---------------cut here---------------end--------------->8---

Best regards,
  Seb

-- 
Sébastien Vauban

_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode-mXXj517/zsQ@public.gmane.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

^ permalink raw reply	[flat|nested] 4+ messages in thread