Browse Source

More forbidden blocks for lists and footnotes

* lisp/org-footnote.el (org-footnote-forbidden-blocks): add missing
  exporter specific blocks.
* lisp/org-list.el (org-list-forbidden-blocks): ditto.
Nicolas Goaziou 13 years ago
parent
commit
dc85f45194
2 changed files with 5 additions and 5 deletions
  1. 3 4
      lisp/org-footnote.el
  2. 2 1
      lisp/org-list.el

+ 3 - 4
lisp/org-footnote.el

@@ -75,10 +75,9 @@
   (org-re "^\\(\\[\\([0-9]+\\|fn:[-_[:word:]]+\\)\\]\\)")
   "Regular expression matching the definition of a footnote.")
 
-(defvar org-footnote-forbidden-blocks '("example" "verse" "src"
-					"latex" "html" "docbook")
-  "Names of blocks where footnotes are not allowed.
-Names must be in lower case.")
+(defvar org-footnote-forbidden-blocks '("example" "verse" "src" "ascii" "beamer"
+					"docbook" "html" "latex" "odt")
+  "Names of blocks where footnotes are not allowed.")
 
 (defgroup org-footnote nil
   "Footnotes in Org-mode."

+ 2 - 1
lisp/org-list.el

@@ -348,7 +348,8 @@ list, obtained by prompting the user."
 	  (list (symbol :tag "Major mode")
 		(string :tag "Format"))))
 
-(defvar org-list-forbidden-blocks '("example" "verse" "src" "latex" "html" "docbook")
+(defvar org-list-forbidden-blocks '("example" "verse" "src" "ascii" "beamer"
+				    "docbook" "html" "latex" "odt")
   "Names of blocks where lists are not allowed.
 Names must be in lower case.")