[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] Beamer--Lisp error: (wrong-type-argument buffer-or-string-p t)
From: |
Sebastien Vauban |
Subject: |
[O] Beamer--Lisp error: (wrong-type-argument buffer-or-string-p t) |
Date: |
Thu, 07 Nov 2013 16:56:08 +0100 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (windows-nt) |
Hello,
When using Org Beamer (in the following ECM, but not limited to it) with the
option H:1, everything works as expected. I get a PDF produced with some
slides.
--8<---------------cut here---------------start------------->8---
#+TITLE: ECM
#+OPTIONS: H:2 texht:t toc:nil
#+BEAMER_THEME: default
* Description
** Objectifs
Rechercher les *composants* qui ...
* Données
** Données
Nombre de *variables* ...
--8<---------------cut here---------------end--------------->8---
Though, when setting H:2 (and refreshing the options), I get:
--8<---------------cut here---------------start------------->8---
Debugger entered--Lisp error: (wrong-type-argument buffer-or-string-p t)
get-text-property(0 org-props t)
org-get-text-property-any(0 org-props t)
org-beamer-sectioning(1 t)
funcall(org-beamer-sectioning 1 t)
(if (functionp (nth 2 class-sectionning)) (funcall (nth 2 class-sectionning)
level numberedp) (nth (1+ level) class-sectionning))
(let ((sec (if (functionp (nth 2 class-sectionning)) (funcall (nth 2
class-sectionning) level numberedp) (nth (1+ level) class-sectionning)))) (cond
((not sec) nil) ((stringp sec) (concat sec "\n%s")) ((not (consp (cdr sec)))
(concat (funcall (if numberedp (function car) (function cdr)) sec) "\n%s")) ((=
(length sec) 2) (if numberedp (progn (concat (car sec) "\n%s" (nth 1 sec)))))
((= (length sec) 4) (if numberedp (concat (car sec) "\n%s" (nth 1 sec)) (concat
(nth 2 sec) "\n%s" (nth 3 sec))))))
(let* ((class (plist-get info :latex-class)) (level
(org-export-get-relative-level headline info)) (numberedp
(org-export-numbered-headline-p headline info)) (class-sectionning (assoc class
org-latex-classes)) (section-fmt (let ((sec (if (functionp ...) (funcall ...
level numberedp) (nth ... class-sectionning)))) (cond ((not sec) nil) ((stringp
sec) (concat sec "\n%s")) ((not (consp ...)) (concat (funcall ... sec) "\n%s"))
((= (length sec) 2) (if numberedp (progn ...))) ((= (length sec) 4) (if
numberedp (concat ... "\n%s" ...) (concat ... "\n%s" ...)))))) (text
(org-export-data (org-element-property :title headline) info)) (todo (and
(plist-get info :with-todo-keywords) (let ((todo (org-element-property
:todo-keyword headline))) (and todo (org-export-data todo info))))) (todo-type
(and todo (org-element-property :todo-type headline))) (tags (and (plist-get
info :with-tags) (org-export-get-tags headline info))) (priority (and
(plist-get info :with-priority) (org-element-property :priority headline)))
(full-text (funcall org-latex-format-headline-function todo todo-type priority
text tags)) (headline-label (format "\\label{sec-%s}\n" (mapconcat (quote
number-to-string) (org-export-get-headline-number headline info) "-")))
(pre-blanks (make-string (org-element-property :pre-blank headline) 10))) (if
(or (not section-fmt) (org-export-low-level-p headline info)) (let
((low-level-body (concat (if (org-export-first-sibling-p headline info) (progn
...)) "\\item " full-text "\n" headline-label pre-blanks contents))) (if (not
(org-export-last-sibling-p headline info)) low-level-body
(replace-regexp-in-string "[ \n]*\\'" (format "\n\\\\end{%s}" (if numberedp
(quote enumerate) (quote itemize))) low-level-body))) (let ((opt-title (funcall
org-latex-format-headline-function todo todo-type priority (org-export-data
(org-export-get-alt-title headline info) info) (and (eq ... t) tags)))) (if
(and numberedp opt-title (not (equal opt-title full-text)) (string-match
"\\`\\\\\\(.*?[^*]\\){" section-fmt)) (format (replace-match "\\1[%s]" nil nil
section-fmt 1) (replace-regexp-in-string "\\[" "(" (replace-regexp-in-string
"\\]" ")" opt-title)) full-text (concat headline-label pre-blanks contents))
(format section-fmt full-text (concat headline-label pre-blanks contents))))))
(if (org-element-property :footnote-section-p headline) nil (let* ((class
(plist-get info :latex-class)) (level (org-export-get-relative-level headline
info)) (numberedp (org-export-numbered-headline-p headline info))
(class-sectionning (assoc class org-latex-classes)) (section-fmt (let ((sec (if
... ... ...))) (cond ((not sec) nil) ((stringp sec) (concat sec "\n%s")) ((not
...) (concat ... "\n%s")) ((= ... 2) (if numberedp ...)) ((= ... 4) (if
numberedp ... ...))))) (text (org-export-data (org-element-property :title
headline) info)) (todo (and (plist-get info :with-todo-keywords) (let ((todo
...)) (and todo (org-export-data todo info))))) (todo-type (and todo
(org-element-property :todo-type headline))) (tags (and (plist-get info
:with-tags) (org-export-get-tags headline info))) (priority (and (plist-get
info :with-priority) (org-element-property :priority headline))) (full-text
(funcall org-latex-format-headline-function todo todo-type priority text tags))
(headline-label (format "\\label{sec-%s}\n" (mapconcat (quote number-to-string)
(org-export-get-headline-number headline info) "-"))) (pre-blanks (make-string
(org-element-property :pre-blank headline) 10))) (if (or (not section-fmt)
(org-export-low-level-p headline info)) (let ((low-level-body (concat (if ...
...) "\\item " full-text "\n" headline-label pre-blanks contents))) (if (not
(org-export-last-sibling-p headline info)) low-level-body
(replace-regexp-in-string "[ \n]*\\'" (format "\n\\\\end{%s}" (if numberedp
... ...)) low-level-body))) (let ((opt-title (funcall
org-latex-format-headline-function todo todo-type priority (org-export-data ...
info) (and ... tags)))) (if (and numberedp opt-title (not (equal opt-title
full-text)) (string-match "\\`\\\\\\(.*?[^*]\\){" section-fmt)) (format
(replace-match "\\1[%s]" nil nil section-fmt 1) (replace-regexp-in-string "\\["
"(" (replace-regexp-in-string "\\]" ")" opt-title)) full-text (concat
headline-label pre-blanks contents)) (format section-fmt full-text (concat
headline-label pre-blanks contents)))))))
org-latex-headline((headline (:raw-value "Description" :begin 74 :end 140
:pre-blank 1 :contents-begin 89 :contents-end 139 :level 1 :priority nil :tags
nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Description" 0 11 (:parent #0))) :parent (org-data nil (section (:begin 1
:end 74 :contents-begin 1 :contents-end 73 :post-blank 1 :parent #2) (keyword
(:key "TITLE" :value "ECM" :begin 1 :end 18 :post-blank 0 :post-affiliated 1
:parent #3)) (keyword (:key "OPTIONS" :value "H:2 texht:t toc:nil" :begin 18
:end 49 :post-blank 0 :post-affiliated 18 :parent #3)) (keyword (:key
"BEAMER_THEME" :value "default" :begin 49 :end 73 :post-blank 0
:post-affiliated 49 :parent #3))) #0 (headline (:raw-value "Données" :begin 140
:end 189 :pre-blank 1 :contents-begin 151 :contents-end 189 :level 1 :priority
nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0
:footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY
"ecm" :title (#("Données" 0 7 (:parent #3))) :parent #2) (headline (:raw-value
"Données" :begin 151 :end 189 :pre-blank 1 :contents-begin 163 :contents-end
189 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY nil :title (#("Données" 0 7 ...)) :parent #3) (section (:begin
163 :end 189 :contents-begin 163 :contents-end 189 :post-blank 0 :parent #4)
(paragraph (:begin 163 :end 189 :contents-begin 163 :contents-end 189
:post-blank 0 :post-affiliated 163 :parent #5) #("Nombre de " 0 10 ...) (bold
... #("variables" 0 9 ...)) #("...\n" 0 4 ...))))))) (headline (:raw-value
"Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103 :contents-end
139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:parent #1))) :parent #0)
(section (:begin 103 :end 140 :contents-begin 103 :contents-end 139 :post-blank
1 :parent #1) (paragraph (:begin 103 :end 139 :contents-begin 103 :contents-end
139 :post-blank 0 :post-affiliated 103 :parent #2) #("Rechercher les " 0 15
(:parent #3)) (bold (:begin 118 :end 131 :contents-begin 119 :contents-end 129
:post-blank 1 :parent #3) #("composants" 0 10 (:parent #4))) #("qui ...\n" 0 8
(:parent #3)))))) #("\\begin{frame}[label=sec-1-1]{Objectifs}\nRechercher les
\\alert{composants} qui \\ldots{}\n\\end{frame}\n" 29 38 (:parent (headline
(:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103
:contents-end 139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:parent #2))) :parent
(headline (:raw-value "Description" :begin 74 :end 140 :pre-blank 1
:contents-begin 89 :contents-end 139 :level 1 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Description" 0 11 ...)) :parent (org-data nil (section ... ... ... ...) #4
(headline ... ...))) #2)) (section (:begin 103 :end 140 :contents-begin 103
:contents-end 139 :post-blank 1 :parent #2) (paragraph (:begin 103 :end 139
:contents-begin 103 :contents-end 139 :post-blank 0 :post-affiliated 103
:parent #3) #("Rechercher les " 0 15 (:parent #4)) (bold (:begin 118 :end 131
:contents-begin 119 :contents-end 129 :post-blank 1 :parent #4) #("composants"
0 10 (:parent #5))) #("qui ...\n" 0 8 (:parent #4)))))) 40 55 (:parent
(paragraph (:begin 103 :end 139 :contents-begin 103 :contents-end 139
:post-blank 0 :post-affiliated 103 :parent (section (:begin 103 :end 140
:contents-begin 103 :contents-end 139 :post-blank 1 :parent (headline
(:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103
:contents-end 139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY "ecm" :title ... :parent ...) #4)) #2)) #("Rechercher
les " 0 15 (:parent #2)) (bold (:begin 118 :end 131 :contents-begin 119
:contents-end 129 :post-blank 1 :parent #2) #("composants" 0 10 (:parent #3)))
#("qui ...\n" 0 8 (:parent #2)))) 62 72 (:parent (bold (:begin 118 :end 131
:contents-begin 119 :contents-end 129 :post-blank 1 :parent (paragraph (:begin
103 :end 139 :contents-begin 103 :contents-end 139 :post-blank 0
:post-affiliated 103 :parent (section (:begin 103 :end 140 :contents-begin 103
:contents-end 139 :post-blank 1 :parent ...) #4)) #("Rechercher les " 0 15
(:parent #4)) #2 #("qui ...\n" 0 8 (:parent #4)))) #("composants" 0 10 (:parent
#2)))) 74 78 (:parent (paragraph (:begin 103 :end 139 :contents-begin 103
:contents-end 139 :post-blank 0 :post-affiliated 103 :parent (section (:begin
103 :end 140 :contents-begin 103 :contents-end 139 :post-blank 1 :parent
(headline (:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1
:contents-begin 103 :contents-end 139 :level 2 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title ... :parent
...) #4)) #2)) #("Rechercher les " 0 15 (:parent #2)) (bold (:begin 118 :end
131 :contents-begin 119 :contents-end 129 :post-blank 1 :parent #2)
#("composants" 0 10 (:parent #3))) #("qui ...\n" 0 8 (:parent #2)))))
(:export-options nil :input-buffer "ecm.txt" :input-file
"d:/Users/fni/Projects/Institutions/Forem/Pfi/PFI/SlideWare/Facteurs-reussite/ecm.txt"
:title ("ECM") :beamer-theme "default" :headline-levels 2 :latex-class
"beamer" :latex-hyperref-p t :date ((latex-fragment (:value "\\today" :begin 1
:end 7 :post-blank 0 :parent #1))) :author ("Fabrice Niessen") :creator "Emacs
24.3.50.1 (Org mode 8.2.1)" :email "address@hidden" :exclude-tags ("noexport")
:language "en" :preserve-breaks nil :section-numbers t :select-tags ("export")
:time-stamp-file t :with-archived-trees headline :with-author t :with-clocks
nil :with-creator comment :with-date t :with-drawers (not "LOGBOOK")
:with-email nil ...))
funcall(org-latex-headline (headline (:raw-value "Description" :begin 74 :end
140 :pre-blank 1 :contents-begin 89 :contents-end 139 :level 1 :priority nil
:tags nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p
nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Description" 0 11 (:parent #0))) :parent (org-data nil (section (:begin 1
:end 74 :contents-begin 1 :contents-end 73 :post-blank 1 :parent #2) (keyword
(:key "TITLE" :value "ECM" :begin 1 :end 18 :post-blank 0 :post-affiliated 1
:parent #3)) (keyword (:key "OPTIONS" :value "H:2 texht:t toc:nil" :begin 18
:end 49 :post-blank 0 :post-affiliated 18 :parent #3)) (keyword (:key
"BEAMER_THEME" :value "default" :begin 49 :end 73 :post-blank 0
:post-affiliated 49 :parent #3))) #0 (headline (:raw-value "Données" :begin 140
:end 189 :pre-blank 1 :contents-begin 151 :contents-end 189 :level 1 :priority
nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0
:footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY
"ecm" :title (#("Données" 0 7 (:parent #3))) :parent #2) (headline (:raw-value
"Données" :begin 151 :end 189 :pre-blank 1 :contents-begin 163 :contents-end
189 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY nil :title (#("Données" 0 7 ...)) :parent #3) (section (:begin
163 :end 189 :contents-begin 163 :contents-end 189 :post-blank 0 :parent #4)
(paragraph (:begin 163 :end 189 :contents-begin 163 :contents-end 189
:post-blank 0 :post-affiliated 163 :parent #5) #("Nombre de " 0 10 ...) (bold
... #("variables" 0 9 ...)) #("...\n" 0 4 ...))))))) (headline (:raw-value
"Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103 :contents-end
139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:parent #1))) :parent #0)
(section (:begin 103 :end 140 :contents-begin 103 :contents-end 139 :post-blank
1 :parent #1) (paragraph (:begin 103 :end 139 :contents-begin 103 :contents-end
139 :post-blank 0 :post-affiliated 103 :parent #2) #("Rechercher les " 0 15
(:parent #3)) (bold (:begin 118 :end 131 :contents-begin 119 :contents-end 129
:post-blank 1 :parent #3) #("composants" 0 10 (:parent #4))) #("qui ...\n" 0 8
(:parent #3)))))) #("\\begin{frame}[label=sec-1-1]{Objectifs}\nRechercher les
\\alert{composants} qui \\ldots{}\n\\end{frame}\n" 29 38 (:parent (headline
(:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103
:contents-end 139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:parent #2))) :parent
(headline (:raw-value "Description" :begin 74 :end 140 :pre-blank 1
:contents-begin 89 :contents-end 139 :level 1 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Description" 0 11 ...)) :parent (org-data nil (section ... ... ... ...) #4
(headline ... ...))) #2)) (section (:begin 103 :end 140 :contents-begin 103
:contents-end 139 :post-blank 1 :parent #2) (paragraph (:begin 103 :end 139
:contents-begin 103 :contents-end 139 :post-blank 0 :post-affiliated 103
:parent #3) #("Rechercher les " 0 15 (:parent #4)) (bold (:begin 118 :end 131
:contents-begin 119 :contents-end 129 :post-blank 1 :parent #4) #("composants"
0 10 (:parent #5))) #("qui ...\n" 0 8 (:parent #4)))))) 40 55 (:parent
(paragraph (:begin 103 :end 139 :contents-begin 103 :contents-end 139
:post-blank 0 :post-affiliated 103 :parent (section (:begin 103 :end 140
:contents-begin 103 :contents-end 139 :post-blank 1 :parent (headline
(:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103
:contents-end 139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY "ecm" :title ... :parent ...) #4)) #2)) #("Rechercher
les " 0 15 (:parent #2)) (bold (:begin 118 :end 131 :contents-begin 119
:contents-end 129 :post-blank 1 :parent #2) #("composants" 0 10 (:parent #3)))
#("qui ...\n" 0 8 (:parent #2)))) 62 72 (:parent (bold (:begin 118 :end 131
:contents-begin 119 :contents-end 129 :post-blank 1 :parent (paragraph (:begin
103 :end 139 :contents-begin 103 :contents-end 139 :post-blank 0
:post-affiliated 103 :parent (section (:begin 103 :end 140 :contents-begin 103
:contents-end 139 :post-blank 1 :parent ...) #4)) #("Rechercher les " 0 15
(:parent #4)) #2 #("qui ...\n" 0 8 (:parent #4)))) #("composants" 0 10 (:parent
#2)))) 74 78 (:parent (paragraph (:begin 103 :end 139 :contents-begin 103
:contents-end 139 :post-blank 0 :post-affiliated 103 :parent (section (:begin
103 :end 140 :contents-begin 103 :contents-end 139 :post-blank 1 :parent
(headline (:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1
:contents-begin 103 :contents-end 139 :level 2 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title ... :parent
...) #4)) #2)) #("Rechercher les " 0 15 (:parent #2)) (bold (:begin 118 :end
131 :contents-begin 119 :contents-end 129 :post-blank 1 :parent #2)
#("composants" 0 10 (:parent #3))) #("qui ...\n" 0 8 (:parent #2)))))
(:export-options nil :input-buffer "ecm.txt" :input-file
"d:/Users/fni/Projects/Institutions/Forem/Pfi/PFI/SlideWare/Facteurs-reussite/ecm.txt"
:title ("ECM") :beamer-theme "default" :headline-levels 2 :latex-class
"beamer" :latex-hyperref-p t :date ((latex-fragment (:value "\\today" :begin 1
:end 7 :post-blank 0 :parent #1))) :author ("Fabrice Niessen") :creator "Emacs
24.3.50.1 (Org mode 8.2.1)" :email "address@hidden" :exclude-tags ("noexport")
:language "en" :preserve-breaks nil :section-numbers t :select-tags ("export")
:time-stamp-file t :with-archived-trees headline :with-author t :with-clocks
nil :with-creator comment :with-date t :with-drawers (not "LOGBOOK")
:with-email nil ...))
(if (not (functionp transcoder)) (error "No foreign transcoder available")
(funcall transcoder data contents (org-combine-plists info (list :back-end
backend :translate-alist all-transcoders :exported-data (make-hash-table :test
(quote eq) :size 401)))))
(let* ((all-transcoders (org-export-get-all-transcoders backend)) (transcoder
(cdr (assq type all-transcoders)))) (if (not (functionp transcoder)) (error "No
foreign transcoder available") (funcall transcoder data contents
(org-combine-plists info (list :back-end backend :translate-alist
all-transcoders :exported-data (make-hash-table :test (quote eq) :size 401))))))
(if (memq type (quote (nil org-data))) (error "No foreign transcoder
available") (let* ((all-transcoders (org-export-get-all-transcoders backend))
(transcoder (cdr (assq type all-transcoders)))) (if (not (functionp
transcoder)) (error "No foreign transcoder available") (funcall transcoder data
contents (org-combine-plists info (list :back-end backend :translate-alist
all-transcoders :exported-data (make-hash-table :test (quote eq) :size
401)))))))
(let ((type (org-element-type data))) (if (memq type (quote (nil org-data)))
(error "No foreign transcoder available") (let* ((all-transcoders
(org-export-get-all-transcoders backend)) (transcoder (cdr (assq type
all-transcoders)))) (if (not (functionp transcoder)) (error "No foreign
transcoder available") (funcall transcoder data contents (org-combine-plists
info (list :back-end backend :translate-alist all-transcoders :exported-data
(make-hash-table :test ... :size 401))))))))
org-export-with-backend([cl-struct-org-export-backend nil latex ((bold lambda
(object contents info) (let ((code (org-export-with-backend (quote beamer)
object contents info))) (if (org-string-nw-p code) (concat "\\protect" code)
code))) (footnote-reference lambda (object contents info) (let ((code
(org-export-with-backend (quote beamer) object contents info))) (if
(org-string-nw-p code) (concat "\\protect" code) code))) (italic lambda (object
contents info) (let ((code (org-export-with-backend (quote beamer) object
contents info))) (if (org-string-nw-p code) (concat "\\protect" code) code)))
(strike-through lambda (object contents info) (let ((code
(org-export-with-backend (quote beamer) object contents info))) (if
(org-string-nw-p code) (concat "\\protect" code) code))) (timestamp lambda
(object contents info) (let ((code (org-export-with-backend (quote beamer)
object contents info))) (if (org-string-nw-p code) (concat "\\protect" code)
code))) (underline lambda (object contents info) (let ((code
(org-export-with-backend (quote beamer) object contents info))) (if
(org-string-nw-p code) (concat "\\protect" code) code)))) nil nil nil nil]
(headline (:raw-value "Description" :begin 74 :end 140 :pre-blank 1
:contents-begin 89 :contents-end 139 :level 1 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Description" 0 11 (:parent #0))) :parent (org-data nil (section (:begin 1
:end 74 :contents-begin 1 :contents-end 73 :post-blank 1 :parent #2) (keyword
(:key "TITLE" :value "ECM" :begin 1 :end 18 :post-blank 0 :post-affiliated 1
:parent #3)) (keyword (:key "OPTIONS" :value "H:2 texht:t toc:nil" :begin 18
:end 49 :post-blank 0 :post-affiliated 18 :parent #3)) (keyword (:key
"BEAMER_THEME" :value "default" :begin 49 :end 73 :post-blank 0
:post-affiliated 49 :parent #3))) #0 (headline (:raw-value "Données" :begin 140
:end 189 :pre-blank 1 :contents-begin 151 :contents-end 189 :level 1 :priority
nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0
:footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY
"ecm" :title (#("Données" 0 7 (:parent #3))) :parent #2) (headline (:raw-value
"Données" :begin 151 :end 189 :pre-blank 1 :contents-begin 163 :contents-end
189 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY nil :title (#("Données" 0 7 ...)) :parent #3) (section (:begin
163 :end 189 :contents-begin 163 :contents-end 189 :post-blank 0 :parent #4)
(paragraph (:begin 163 :end 189 :contents-begin 163 :contents-end 189
:post-blank 0 :post-affiliated 163 :parent #5) #("Nombre de " 0 10 ...) (bold
... #("variables" 0 9 ...)) #("...\n" 0 4 ...))))))) (headline (:raw-value
"Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103 :contents-end
139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:parent #1))) :parent #0)
(section (:begin 103 :end 140 :contents-begin 103 :contents-end 139 :post-blank
1 :parent #1) (paragraph (:begin 103 :end 139 :contents-begin 103 :contents-end
139 :post-blank 0 :post-affiliated 103 :parent #2) #("Rechercher les " 0 15
(:parent #3)) (bold (:begin 118 :end 131 :contents-begin 119 :contents-end 129
:post-blank 1 :parent #3) #("composants" 0 10 (:parent #4))) #("qui ...\n" 0 8
(:parent #3)))))) #("\\begin{frame}[label=sec-1-1]{Objectifs}\nRechercher les
\\alert{composants} qui \\ldots{}\n\\end{frame}\n" 29 38 (:parent (headline
(:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103
:contents-end 139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:parent #2))) :parent
(headline (:raw-value "Description" :begin 74 :end 140 :pre-blank 1
:contents-begin 89 :contents-end 139 :level 1 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Description" 0 11 ...)) :parent (org-data nil (section ... ... ... ...) #4
(headline ... ...))) #2)) (section (:begin 103 :end 140 :contents-begin 103
:contents-end 139 :post-blank 1 :parent #2) (paragraph (:begin 103 :end 139
:contents-begin 103 :contents-end 139 :post-blank 0 :post-affiliated 103
:parent #3) #("Rechercher les " 0 15 (:parent #4)) (bold (:begin 118 :end 131
:contents-begin 119 :contents-end 129 :post-blank 1 :parent #4) #("composants"
0 10 (:parent #5))) #("qui ...\n" 0 8 (:parent #4)))))) 40 55 (:parent
(paragraph (:begin 103 :end 139 :contents-begin 103 :contents-end 139
:post-blank 0 :post-affiliated 103 :parent (section (:begin 103 :end 140
:contents-begin 103 :contents-end 139 :post-blank 1 :parent (headline
(:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103
:contents-end 139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY "ecm" :title ... :parent ...) #4)) #2)) #("Rechercher
les " 0 15 (:parent #2)) (bold (:begin 118 :end 131 :contents-begin 119
:contents-end 129 :post-blank 1 :parent #2) #("composants" 0 10 (:parent #3)))
#("qui ...\n" 0 8 (:parent #2)))) 62 72 (:parent (bold (:begin 118 :end 131
:contents-begin 119 :contents-end 129 :post-blank 1 :parent (paragraph (:begin
103 :end 139 :contents-begin 103 :contents-end 139 :post-blank 0
:post-affiliated 103 :parent (section (:begin 103 :end 140 :contents-begin 103
:contents-end 139 :post-blank 1 :parent ...) #4)) #("Rechercher les " 0 15
(:parent #4)) #2 #("qui ...\n" 0 8 (:parent #4)))) #("composants" 0 10 (:parent
#2)))) 74 78 (:parent (paragraph (:begin 103 :end 139 :contents-begin 103
:contents-end 139 :post-blank 0 :post-affiliated 103 :parent (section (:begin
103 :end 140 :contents-begin 103 :contents-end 139 :post-blank 1 :parent
(headline (:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1
:contents-begin 103 :contents-end 139 :level 2 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title ... :parent
...) #4)) #2)) #("Rechercher les " 0 15 (:parent #2)) (bold (:begin 118 :end
131 :contents-begin 119 :contents-end 129 :post-blank 1 :parent #2)
#("composants" 0 10 (:parent #3))) #("qui ...\n" 0 8 (:parent #2)))))
(:export-options nil :input-buffer "ecm.txt" :input-file
"d:/Users/fni/Projects/Institutions/Forem/Pfi/PFI/SlideWare/Facteurs-reussite/ecm.txt"
:title ("ECM") :beamer-theme "default" :headline-levels 2 :latex-class
"beamer" :latex-hyperref-p t :date ((latex-fragment (:value "\\today" :begin 1
:end 7 :post-blank 0 :parent #1))) :author ("Fabrice Niessen") :creator "Emacs
24.3.50.1 (Org mode 8.2.1)" :email "address@hidden" :exclude-tags ("noexport")
:language "en" :preserve-breaks nil :section-numbers t :select-tags ("export")
:time-stamp-file t :with-archived-trees headline :with-author t :with-clocks
nil :with-creator comment :with-date t :with-drawers (not "LOGBOOK")
:with-email nil ...))
(let ((latex-headline (org-export-with-backend (org-export-create-backend
:parent (quote latex) :transcoders (let ((protected-output ...)) (mapcar
(function ...) (quote ...)))) headline contents info)) (mode-specs
(org-element-property :BEAMER_ACT headline))) (if (and mode-specs (string-match
"\\`\\\\\\(.*?\\)\\(?:\\*\\|\\[.*\\]\\)?{" latex-headline)) (replace-match
(concat (match-string 1 latex-headline) (format "<%s>" mode-specs)) nil nil
latex-headline 1) latex-headline))
org-beamer--format-section((headline (:raw-value "Description" :begin 74 :end
140 :pre-blank 1 :contents-begin 89 :contents-end 139 :level 1 :priority nil
:tags nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p
nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Description" 0 11 (:parent #0))) :parent (org-data nil (section (:begin 1
:end 74 :contents-begin 1 :contents-end 73 :post-blank 1 :parent #2) (keyword
(:key "TITLE" :value "ECM" :begin 1 :end 18 :post-blank 0 :post-affiliated 1
:parent #3)) (keyword (:key "OPTIONS" :value "H:2 texht:t toc:nil" :begin 18
:end 49 :post-blank 0 :post-affiliated 18 :parent #3)) (keyword (:key
"BEAMER_THEME" :value "default" :begin 49 :end 73 :post-blank 0
:post-affiliated 49 :parent #3))) #0 (headline (:raw-value "Données" :begin 140
:end 189 :pre-blank 1 :contents-begin 151 :contents-end 189 :level 1 :priority
nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0
:footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY
"ecm" :title (#("Données" 0 7 (:parent #3))) :parent #2) (headline (:raw-value
"Données" :begin 151 :end 189 :pre-blank 1 :contents-begin 163 :contents-end
189 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY nil :title (#("Données" 0 7 ...)) :parent #3) (section (:begin
163 :end 189 :contents-begin 163 :contents-end 189 :post-blank 0 :parent #4)
(paragraph (:begin 163 :end 189 :contents-begin 163 :contents-end 189
:post-blank 0 :post-affiliated 163 :parent #5) #("Nombre de " 0 10 ...) (bold
... #("variables" 0 9 ...)) #("...\n" 0 4 ...))))))) (headline (:raw-value
"Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103 :contents-end
139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:parent #1))) :parent #0)
(section (:begin 103 :end 140 :contents-begin 103 :contents-end 139 :post-blank
1 :parent #1) (paragraph (:begin 103 :end 139 :contents-begin 103 :contents-end
139 :post-blank 0 :post-affiliated 103 :parent #2) #("Rechercher les " 0 15
(:parent #3)) (bold (:begin 118 :end 131 :contents-begin 119 :contents-end 129
:post-blank 1 :parent #3) #("composants" 0 10 (:parent #4))) #("qui ...\n" 0 8
(:parent #3)))))) #("\\begin{frame}[label=sec-1-1]{Objectifs}\nRechercher les
\\alert{composants} qui \\ldots{}\n\\end{frame}\n" 29 38 (:parent (headline
(:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103
:contents-end 139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:parent #2))) :parent
(headline (:raw-value "Description" :begin 74 :end 140 :pre-blank 1
:contents-begin 89 :contents-end 139 :level 1 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Description" 0 11 ...)) :parent (org-data nil (section ... ... ... ...) #4
(headline ... ...))) #2)) (section (:begin 103 :end 140 :contents-begin 103
:contents-end 139 :post-blank 1 :parent #2) (paragraph (:begin 103 :end 139
:contents-begin 103 :contents-end 139 :post-blank 0 :post-affiliated 103
:parent #3) #("Rechercher les " 0 15 (:parent #4)) (bold (:begin 118 :end 131
:contents-begin 119 :contents-end 129 :post-blank 1 :parent #4) #("composants"
0 10 (:parent #5))) #("qui ...\n" 0 8 (:parent #4)))))) 40 55 (:parent
(paragraph (:begin 103 :end 139 :contents-begin 103 :contents-end 139
:post-blank 0 :post-affiliated 103 :parent (section (:begin 103 :end 140
:contents-begin 103 :contents-end 139 :post-blank 1 :parent (headline
(:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103
:contents-end 139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY "ecm" :title ... :parent ...) #4)) #2)) #("Rechercher
les " 0 15 (:parent #2)) (bold (:begin 118 :end 131 :contents-begin 119
:contents-end 129 :post-blank 1 :parent #2) #("composants" 0 10 (:parent #3)))
#("qui ...\n" 0 8 (:parent #2)))) 62 72 (:parent (bold (:begin 118 :end 131
:contents-begin 119 :contents-end 129 :post-blank 1 :parent (paragraph (:begin
103 :end 139 :contents-begin 103 :contents-end 139 :post-blank 0
:post-affiliated 103 :parent (section (:begin 103 :end 140 :contents-begin 103
:contents-end 139 :post-blank 1 :parent ...) #4)) #("Rechercher les " 0 15
(:parent #4)) #2 #("qui ...\n" 0 8 (:parent #4)))) #("composants" 0 10 (:parent
#2)))) 74 78 (:parent (paragraph (:begin 103 :end 139 :contents-begin 103
:contents-end 139 :post-blank 0 :post-affiliated 103 :parent (section (:begin
103 :end 140 :contents-begin 103 :contents-end 139 :post-blank 1 :parent
(headline (:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1
:contents-begin 103 :contents-end 139 :level 2 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title ... :parent
...) #4)) #2)) #("Rechercher les " 0 15 (:parent #2)) (bold (:begin 118 :end
131 :contents-begin 119 :contents-end 129 :post-blank 1 :parent #2)
#("composants" 0 10 (:parent #3))) #("qui ...\n" 0 8 (:parent #2)))))
(:export-options nil :input-buffer "ecm.txt" :input-file
"d:/Users/fni/Projects/Institutions/Forem/Pfi/PFI/SlideWare/Facteurs-reussite/ecm.txt"
:title ("ECM") :beamer-theme "default" :headline-levels 2 :latex-class
"beamer" :latex-hyperref-p t :date ((latex-fragment (:value "\\today" :begin 1
:end 7 :post-blank 0 :parent #1))) :author ("Fabrice Niessen") :creator "Emacs
24.3.50.1 (Org mode 8.2.1)" :email "address@hidden" :exclude-tags ("noexport")
:language "en" :preserve-breaks nil :section-numbers t :select-tags ("export")
:time-stamp-file t :with-archived-trees headline :with-author t :with-clocks
nil :with-creator comment :with-date t :with-drawers (not "LOGBOOK")
:with-email nil ...))
(cond ((equal environment "againframe") (let ((ref (org-element-property
:BEAMER_REF headline))) (if (org-string-nw-p ref) (progn (concat "\\againframe"
(let (...) (if overlay ...)) (let (...) (if options ...)) (let* (... ... ...)
(format "{%s}" ...))))))) ((equal environment "appendix") (concat "\\appendix"
(org-element-property :BEAMER_ACT headline) "\n" (make-string
(org-element-property :pre-blank headline) 10) contents)) ((equal environment
"ignoreheading") (concat (make-string (org-element-property :pre-blank
headline) 10) contents)) ((member environment (quote ("note" "noteNH")))
(format "\\note{%s}" (concat (and (equal environment "note") (concat
(org-export-data (org-element-property :title headline) info) "\n")) (org-trim
contents)))) ((= level frame-level) (org-beamer--format-frame headline contents
info)) ((< level frame-level) (org-beamer--format-section headline contents
info)) (t (org-beamer--format-block headline contents info)))
(let ((level (org-export-get-relative-level headline info)) (frame-level
(org-beamer--frame-level headline info)) (environment (let ((env
(org-element-property :BEAMER_ENV headline))) (or (org-string-nw-p env)
"block")))) (cond ((equal environment "againframe") (let ((ref
(org-element-property :BEAMER_REF headline))) (if (org-string-nw-p ref) (progn
(concat "\\againframe" (let ... ...) (let ... ...) (let* ... ...)))))) ((equal
environment "appendix") (concat "\\appendix" (org-element-property :BEAMER_ACT
headline) "\n" (make-string (org-element-property :pre-blank headline) 10)
contents)) ((equal environment "ignoreheading") (concat (make-string
(org-element-property :pre-blank headline) 10) contents)) ((member environment
(quote ("note" "noteNH"))) (format "\\note{%s}" (concat (and (equal environment
"note") (concat (org-export-data ... info) "\n")) (org-trim contents)))) ((=
level frame-level) (org-beamer--format-frame headline contents info)) ((< level
frame-level) (org-beamer--format-section headline contents info)) (t
(org-beamer--format-block headline contents info))))
(if (org-element-property :footnote-section-p headline) nil (let ((level
(org-export-get-relative-level headline info)) (frame-level
(org-beamer--frame-level headline info)) (environment (let ((env
(org-element-property :BEAMER_ENV headline))) (or (org-string-nw-p env)
"block")))) (cond ((equal environment "againframe") (let ((ref
(org-element-property :BEAMER_REF headline))) (if (org-string-nw-p ref) (progn
(concat "\\againframe" ... ... ...))))) ((equal environment "appendix") (concat
"\\appendix" (org-element-property :BEAMER_ACT headline) "\n" (make-string
(org-element-property :pre-blank headline) 10) contents)) ((equal environment
"ignoreheading") (concat (make-string (org-element-property :pre-blank
headline) 10) contents)) ((member environment (quote ("note" "noteNH")))
(format "\\note{%s}" (concat (and (equal environment "note") (concat ... "\n"))
(org-trim contents)))) ((= level frame-level) (org-beamer--format-frame
headline contents info)) ((< level frame-level) (org-beamer--format-section
headline contents info)) (t (org-beamer--format-block headline contents
info)))))
org-beamer-headline((headline (:raw-value "Description" :begin 74 :end 140
:pre-blank 1 :contents-begin 89 :contents-end 139 :level 1 :priority nil :tags
nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Description" 0 11 (:parent #0))) :parent (org-data nil (section (:begin 1
:end 74 :contents-begin 1 :contents-end 73 :post-blank 1 :parent #2) (keyword
(:key "TITLE" :value "ECM" :begin 1 :end 18 :post-blank 0 :post-affiliated 1
:parent #3)) (keyword (:key "OPTIONS" :value "H:2 texht:t toc:nil" :begin 18
:end 49 :post-blank 0 :post-affiliated 18 :parent #3)) (keyword (:key
"BEAMER_THEME" :value "default" :begin 49 :end 73 :post-blank 0
:post-affiliated 49 :parent #3))) #0 (headline (:raw-value "Données" :begin 140
:end 189 :pre-blank 1 :contents-begin 151 :contents-end 189 :level 1 :priority
nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0
:footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY
"ecm" :title (#("Données" 0 7 (:parent #3))) :parent #2) (headline (:raw-value
"Données" :begin 151 :end 189 :pre-blank 1 :contents-begin 163 :contents-end
189 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY nil :title (#("Données" 0 7 ...)) :parent #3) (section (:begin
163 :end 189 :contents-begin 163 :contents-end 189 :post-blank 0 :parent #4)
(paragraph (:begin 163 :end 189 :contents-begin 163 :contents-end 189
:post-blank 0 :post-affiliated 163 :parent #5) #("Nombre de " 0 10 ...) (bold
... #("variables" 0 9 ...)) #("...\n" 0 4 ...))))))) (headline (:raw-value
"Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103 :contents-end
139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:parent #1))) :parent #0)
(section (:begin 103 :end 140 :contents-begin 103 :contents-end 139 :post-blank
1 :parent #1) (paragraph (:begin 103 :end 139 :contents-begin 103 :contents-end
139 :post-blank 0 :post-affiliated 103 :parent #2) #("Rechercher les " 0 15
(:parent #3)) (bold (:begin 118 :end 131 :contents-begin 119 :contents-end 129
:post-blank 1 :parent #3) #("composants" 0 10 (:parent #4))) #("qui ...\n" 0 8
(:parent #3)))))) #("\\begin{frame}[label=sec-1-1]{Objectifs}\nRechercher les
\\alert{composants} qui \\ldots{}\n\\end{frame}\n" 29 38 (:parent (headline
(:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103
:contents-end 139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:parent #2))) :parent
(headline (:raw-value "Description" :begin 74 :end 140 :pre-blank 1
:contents-begin 89 :contents-end 139 :level 1 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Description" 0 11 ...)) :parent (org-data nil (section ... ... ... ...) #4
(headline ... ...))) #2)) (section (:begin 103 :end 140 :contents-begin 103
:contents-end 139 :post-blank 1 :parent #2) (paragraph (:begin 103 :end 139
:contents-begin 103 :contents-end 139 :post-blank 0 :post-affiliated 103
:parent #3) #("Rechercher les " 0 15 (:parent #4)) (bold (:begin 118 :end 131
:contents-begin 119 :contents-end 129 :post-blank 1 :parent #4) #("composants"
0 10 (:parent #5))) #("qui ...\n" 0 8 (:parent #4)))))) 40 55 (:parent
(paragraph (:begin 103 :end 139 :contents-begin 103 :contents-end 139
:post-blank 0 :post-affiliated 103 :parent (section (:begin 103 :end 140
:contents-begin 103 :contents-end 139 :post-blank 1 :parent (headline
(:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103
:contents-end 139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY "ecm" :title ... :parent ...) #4)) #2)) #("Rechercher
les " 0 15 (:parent #2)) (bold (:begin 118 :end 131 :contents-begin 119
:contents-end 129 :post-blank 1 :parent #2) #("composants" 0 10 (:parent #3)))
#("qui ...\n" 0 8 (:parent #2)))) 62 72 (:parent (bold (:begin 118 :end 131
:contents-begin 119 :contents-end 129 :post-blank 1 :parent (paragraph (:begin
103 :end 139 :contents-begin 103 :contents-end 139 :post-blank 0
:post-affiliated 103 :parent (section (:begin 103 :end 140 :contents-begin 103
:contents-end 139 :post-blank 1 :parent ...) #4)) #("Rechercher les " 0 15
(:parent #4)) #2 #("qui ...\n" 0 8 (:parent #4)))) #("composants" 0 10 (:parent
#2)))) 74 78 (:parent (paragraph (:begin 103 :end 139 :contents-begin 103
:contents-end 139 :post-blank 0 :post-affiliated 103 :parent (section (:begin
103 :end 140 :contents-begin 103 :contents-end 139 :post-blank 1 :parent
(headline (:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1
:contents-begin 103 :contents-end 139 :level 2 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title ... :parent
...) #4)) #2)) #("Rechercher les " 0 15 (:parent #2)) (bold (:begin 118 :end
131 :contents-begin 119 :contents-end 129 :post-blank 1 :parent #2)
#("composants" 0 10 (:parent #3))) #("qui ...\n" 0 8 (:parent #2)))))
(:export-options nil :input-buffer "ecm.txt" :input-file
"d:/Users/fni/Projects/Institutions/Forem/Pfi/PFI/SlideWare/Facteurs-reussite/ecm.txt"
:title ("ECM") :beamer-theme "default" :headline-levels 2 :latex-class
"beamer" :latex-hyperref-p t :date ((latex-fragment (:value "\\today" :begin 1
:end 7 :post-blank 0 :parent #1))) :author ("Fabrice Niessen") :creator "Emacs
24.3.50.1 (Org mode 8.2.1)" :email "address@hidden" :exclude-tags ("noexport")
:language "en" :preserve-breaks nil :section-numbers t :select-tags ("export")
:time-stamp-file t :with-archived-trees headline :with-author t :with-clocks
nil :with-creator comment :with-date t :with-drawers (not "LOGBOOK")
:with-email nil ...))
funcall(org-beamer-headline (headline (:raw-value "Description" :begin 74
:end 140 :pre-blank 1 :contents-begin 89 :contents-end 139 :level 1 :priority
nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0
:footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY
"ecm" :title (#("Description" 0 11 (:parent #0))) :parent (org-data nil
(section (:begin 1 :end 74 :contents-begin 1 :contents-end 73 :post-blank 1
:parent #2) (keyword (:key "TITLE" :value "ECM" :begin 1 :end 18 :post-blank 0
:post-affiliated 1 :parent #3)) (keyword (:key "OPTIONS" :value "H:2 texht:t
toc:nil" :begin 18 :end 49 :post-blank 0 :post-affiliated 18 :parent #3))
(keyword (:key "BEAMER_THEME" :value "default" :begin 49 :end 73 :post-blank 0
:post-affiliated 49 :parent #3))) #0 (headline (:raw-value "Données" :begin 140
:end 189 :pre-blank 1 :contents-begin 151 :contents-end 189 :level 1 :priority
nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0
:footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY
"ecm" :title (#("Données" 0 7 (:parent #3))) :parent #2) (headline (:raw-value
"Données" :begin 151 :end 189 :pre-blank 1 :contents-begin 163 :contents-end
189 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY nil :title (#("Données" 0 7 ...)) :parent #3) (section (:begin
163 :end 189 :contents-begin 163 :contents-end 189 :post-blank 0 :parent #4)
(paragraph (:begin 163 :end 189 :contents-begin 163 :contents-end 189
:post-blank 0 :post-affiliated 163 :parent #5) #("Nombre de " 0 10 ...) (bold
... #("variables" 0 9 ...)) #("...\n" 0 4 ...))))))) (headline (:raw-value
"Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103 :contents-end
139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:parent #1))) :parent #0)
(section (:begin 103 :end 140 :contents-begin 103 :contents-end 139 :post-blank
1 :parent #1) (paragraph (:begin 103 :end 139 :contents-begin 103 :contents-end
139 :post-blank 0 :post-affiliated 103 :parent #2) #("Rechercher les " 0 15
(:parent #3)) (bold (:begin 118 :end 131 :contents-begin 119 :contents-end 129
:post-blank 1 :parent #3) #("composants" 0 10 (:parent #4))) #("qui ...\n" 0 8
(:parent #3)))))) #("\\begin{frame}[label=sec-1-1]{Objectifs}\nRechercher les
\\alert{composants} qui \\ldots{}\n\\end{frame}\n" 29 38 (:parent (headline
(:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103
:contents-end 139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:parent #2))) :parent
(headline (:raw-value "Description" :begin 74 :end 140 :pre-blank 1
:contents-begin 89 :contents-end 139 :level 1 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Description" 0 11 ...)) :parent (org-data nil (section ... ... ... ...) #4
(headline ... ...))) #2)) (section (:begin 103 :end 140 :contents-begin 103
:contents-end 139 :post-blank 1 :parent #2) (paragraph (:begin 103 :end 139
:contents-begin 103 :contents-end 139 :post-blank 0 :post-affiliated 103
:parent #3) #("Rechercher les " 0 15 (:parent #4)) (bold (:begin 118 :end 131
:contents-begin 119 :contents-end 129 :post-blank 1 :parent #4) #("composants"
0 10 (:parent #5))) #("qui ...\n" 0 8 (:parent #4)))))) 40 55 (:parent
(paragraph (:begin 103 :end 139 :contents-begin 103 :contents-end 139
:post-blank 0 :post-affiliated 103 :parent (section (:begin 103 :end 140
:contents-begin 103 :contents-end 139 :post-blank 1 :parent (headline
(:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103
:contents-end 139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY "ecm" :title ... :parent ...) #4)) #2)) #("Rechercher
les " 0 15 (:parent #2)) (bold (:begin 118 :end 131 :contents-begin 119
:contents-end 129 :post-blank 1 :parent #2) #("composants" 0 10 (:parent #3)))
#("qui ...\n" 0 8 (:parent #2)))) 62 72 (:parent (bold (:begin 118 :end 131
:contents-begin 119 :contents-end 129 :post-blank 1 :parent (paragraph (:begin
103 :end 139 :contents-begin 103 :contents-end 139 :post-blank 0
:post-affiliated 103 :parent (section (:begin 103 :end 140 :contents-begin 103
:contents-end 139 :post-blank 1 :parent ...) #4)) #("Rechercher les " 0 15
(:parent #4)) #2 #("qui ...\n" 0 8 (:parent #4)))) #("composants" 0 10 (:parent
#2)))) 74 78 (:parent (paragraph (:begin 103 :end 139 :contents-begin 103
:contents-end 139 :post-blank 0 :post-affiliated 103 :parent (section (:begin
103 :end 140 :contents-begin 103 :contents-end 139 :post-blank 1 :parent
(headline (:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1
:contents-begin 103 :contents-end 139 :level 2 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title ... :parent
...) #4)) #2)) #("Rechercher les " 0 15 (:parent #2)) (bold (:begin 118 :end
131 :contents-begin 119 :contents-end 129 :post-blank 1 :parent #2)
#("composants" 0 10 (:parent #3))) #("qui ...\n" 0 8 (:parent #2)))))
(:export-options nil :input-buffer "ecm.txt" :input-file
"d:/Users/fni/Projects/Institutions/Forem/Pfi/PFI/SlideWare/Facteurs-reussite/ecm.txt"
:title ("ECM") :beamer-theme "default" :headline-levels 2 :latex-class
"beamer" :latex-hyperref-p t :date ((latex-fragment (:value "\\today" :begin 1
:end 7 :post-blank 0 :parent #1))) :author ("Fabrice Niessen") :creator "Emacs
24.3.50.1 (Org mode 8.2.1)" :email "address@hidden" :exclude-tags ("noexport")
:language "en" :preserve-breaks nil :section-numbers t :select-tags ("export")
:time-stamp-file t :with-archived-trees headline :with-author t :with-clocks
nil :with-creator comment :with-date t :with-drawers (not "LOGBOOK")
:with-email nil ...))
(let* ((greaterp (memq type org-element-greater-elements)) (objectp (and (not
greaterp) (memq type org-element-recursive-objects))) (contents (mapconcat
(function (lambda (element) (org-export-data element info)))
(org-element-contents (if (or greaterp objectp) data
(org-element-normalize-contents data (if ... ...)))) ""))) (funcall transcoder
data (if (not greaterp) contents (org-element-normalize-string contents)) info))
(progn (let* ((greaterp (memq type org-element-greater-elements)) (objectp
(and (not greaterp) (memq type org-element-recursive-objects))) (contents
(mapconcat (function (lambda (element) (org-export-data element info)))
(org-element-contents (if (or greaterp objectp) data
(org-element-normalize-contents data ...))) ""))) (funcall transcoder data (if
(not greaterp) contents (org-element-normalize-string contents)) info)))
(if transcoder (progn (let* ((greaterp (memq type
org-element-greater-elements)) (objectp (and (not greaterp) (memq type
org-element-recursive-objects))) (contents (mapconcat (function (lambda ...
...)) (org-element-contents (if ... data ...)) ""))) (funcall transcoder data
(if (not greaterp) contents (org-element-normalize-string contents)) info))))
(let ((transcoder (org-export-transcoder data info))) (if transcoder (progn
(let* ((greaterp (memq type org-element-greater-elements)) (objectp (and (not
greaterp) (memq type org-element-recursive-objects))) (contents (mapconcat
(function ...) (org-element-contents ...) ""))) (funcall transcoder data (if
(not greaterp) contents (org-element-normalize-string contents)) info)))))
(cond ((memq data (plist-get info :ignore-list)) nil) ((eq type (quote
plain-text)) (org-export-filter-apply-functions (plist-get info
:filter-plain-text) (let ((transcoder (org-export-transcoder data info))) (if
transcoder (funcall transcoder data info) data)) info)) ((not
(org-export--interpret-p data info)) (org-export-data (org-export-expand data
(mapconcat (function (lambda (blob) (org-export-data blob info)))
(org-element-contents data) "")) info)) ((not type) (mapconcat (function
(lambda (obj) (org-export-data obj info))) data "")) ((or (not
(org-element-contents data)) (and (eq type (quote headline)) (eq (plist-get
info :with-archived-trees) (quote headline)) (org-element-property :archivedp
data))) (let ((transcoder (org-export-transcoder data info))) (or (and
(functionp transcoder) (funcall transcoder data nil info)) (and (eq type (quote
export-snippet)) "")))) (t (let ((transcoder (org-export-transcoder data
info))) (if transcoder (progn (let* ((greaterp ...) (objectp ...) (contents
...)) (funcall transcoder data (if ... contents ...) info)))))))
(let* ((type (org-element-type data)) (results (cond ((memq data (plist-get
info :ignore-list)) nil) ((eq type (quote plain-text))
(org-export-filter-apply-functions (plist-get info :filter-plain-text) (let
(...) (if transcoder ... data)) info)) ((not (org-export--interpret-p data
info)) (org-export-data (org-export-expand data (mapconcat ... ... "")) info))
((not type) (mapconcat (function (lambda ... ...)) data "")) ((or (not
(org-element-contents data)) (and (eq type ...) (eq ... ...)
(org-element-property :archivedp data))) (let ((transcoder ...)) (or (and ...
...) (and ... "")))) (t (let ((transcoder ...)) (if transcoder (progn
...))))))) (puthash data (cond ((not results) nil) ((memq type (quote (org-data
plain-text nil))) results) (t (let ((results (org-export-filter-apply-functions
... ... info))) results))) (plist-get info :exported-data)))
(if (not (eq memo (quote no-memo))) memo (let* ((type (org-element-type
data)) (results (cond ((memq data (plist-get info :ignore-list)) nil) ((eq type
(quote plain-text)) (org-export-filter-apply-functions (plist-get info
:filter-plain-text) (let ... ...) info)) ((not (org-export--interpret-p data
info)) (org-export-data (org-export-expand data ...) info)) ((not type)
(mapconcat (function ...) data "")) ((or (not ...) (and ... ... ...)) (let
(...) (or ... ...))) (t (let (...) (if transcoder ...)))))) (puthash data (cond
((not results) nil) ((memq type (quote (org-data plain-text nil))) results) (t
(let ((results ...)) results))) (plist-get info :exported-data))))
(let ((memo (gethash data (plist-get info :exported-data) (quote no-memo))))
(if (not (eq memo (quote no-memo))) memo (let* ((type (org-element-type data))
(results (cond ((memq data ...) nil) ((eq type ...)
(org-export-filter-apply-functions ... ... info)) ((not ...) (org-export-data
... info)) ((not type) (mapconcat ... data "")) ((or ... ...) (let ... ...)) (t
(let ... ...))))) (puthash data (cond ((not results) nil) ((memq type (quote
...)) results) (t (let (...) results))) (plist-get info :exported-data)))))
org-export-data((headline (:raw-value "Description" :begin 74 :end 140
:pre-blank 1 :contents-begin 89 :contents-end 139 :level 1 :priority nil :tags
nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Description" 0 11 (:parent #0))) :parent (org-data nil (section (:begin 1
:end 74 :contents-begin 1 :contents-end 73 :post-blank 1 :parent #2) (keyword
(:key "TITLE" :value "ECM" :begin 1 :end 18 :post-blank 0 :post-affiliated 1
:parent #3)) (keyword (:key "OPTIONS" :value "H:2 texht:t toc:nil" :begin 18
:end 49 :post-blank 0 :post-affiliated 18 :parent #3)) (keyword (:key
"BEAMER_THEME" :value "default" :begin 49 :end 73 :post-blank 0
:post-affiliated 49 :parent #3))) #0 (headline (:raw-value "Données" :begin 140
:end 189 :pre-blank 1 :contents-begin 151 :contents-end 189 :level 1 :priority
nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0
:footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY
"ecm" :title (#("Données" 0 7 (:parent #3))) :parent #2) (headline (:raw-value
"Données" :begin 151 :end 189 :pre-blank 1 :contents-begin 163 :contents-end
189 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY nil :title (#("Données" 0 7 ...)) :parent #3) (section (:begin
163 :end 189 :contents-begin 163 :contents-end 189 :post-blank 0 :parent #4)
(paragraph (:begin 163 :end 189 :contents-begin 163 :contents-end 189
:post-blank 0 :post-affiliated 163 :parent #5) #("Nombre de " 0 10 ...) (bold
... #("variables" 0 9 ...)) #("...\n" 0 4 ...))))))) (headline (:raw-value
"Objectifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103 :contents-end
139 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:parent #1))) :parent #0)
(section (:begin 103 :end 140 :contents-begin 103 :contents-end 139 :post-blank
1 :parent #1) (paragraph (:begin 103 :end 139 :contents-begin 103 :contents-end
139 :post-blank 0 :post-affiliated 103 :parent #2) #("Rechercher les " 0 15
(:parent #3)) (bold (:begin 118 :end 131 :contents-begin 119 :contents-end 129
:post-blank 1 :parent #3) #("composants" 0 10 (:parent #4))) #("qui ...\n" 0 8
(:parent #3)))))) (:export-options nil :input-buffer "ecm.txt" :input-file
"d:/Users/fni/Projects/Institutions/Forem/Pfi/PFI/SlideWare/Facteurs-reussite/ecm.txt"
:title ("ECM") :beamer-theme "default" :headline-levels 2 :latex-class
"beamer" :latex-hyperref-p t :date ((latex-fragment (:value "\\today" :begin 1
:end 7 :post-blank 0 :parent #1))) :author ("Fabrice Niessen") :creator "Emacs
24.3.50.1 (Org mode 8.2.1)" :email "address@hidden" :exclude-tags ("noexport")
:language "en" :preserve-breaks nil :section-numbers t :select-tags ("export")
:time-stamp-file t :with-archived-trees headline :with-author t :with-clocks
nil :with-creator comment :with-date t :with-drawers (not "LOGBOOK")
:with-email nil ...))
(lambda (element) (org-export-data element info))((headline (:raw-value
"Description" :begin 74 :end 140 :pre-blank 1 :contents-begin 89 :contents-end
139 :level 1 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY "ecm" :title (#("Description" 0 11 (:parent #0))) :parent
(org-data nil (section (:begin 1 :end 74 :contents-begin 1 :contents-end 73
:post-blank 1 :parent #2) (keyword (:key "TITLE" :value "ECM" :begin 1 :end 18
:post-blank 0 :post-affiliated 1 :parent #3)) (keyword (:key "OPTIONS" :value
"H:2 texht:t toc:nil" :begin 18 :end 49 :post-blank 0 :post-affiliated 18
:parent #3)) (keyword (:key "BEAMER_THEME" :value "default" :begin 49 :end 73
:post-blank 0 :post-affiliated 49 :parent #3))) #0 (headline (:raw-value
"Données" :begin 140 :end 189 :pre-blank 1 :contents-begin 151 :contents-end
189 :level 1 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY "ecm" :title (#("Données" 0 7 (:parent #3))) :parent #2)
(headline (:raw-value "Données" :begin 151 :end 189 :pre-blank 1
:contents-begin 163 :contents-end 189 :level 2 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY nil :title (#("Données" 0
7 ...)) :parent #3) (section (:begin 163 :end 189 :contents-begin 163
:contents-end 189 :post-blank 0 :parent #4) (paragraph (:begin 163 :end 189
:contents-begin 163 :contents-end 189 :post-blank 0 :post-affiliated 163
:parent #5) #("Nombre de " 0 10 ...) (bold ... #("variables" 0 9 ...))
#("...\n" 0 4 ...))))))) (headline (:raw-value "Objectifs" :begin 89 :end 140
:pre-blank 1 :contents-begin 103 :contents-end 139 :level 2 :priority nil :tags
nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Objectifs" 0 9 (:parent #1))) :parent #0) (section (:begin 103 :end 140
:contents-begin 103 :contents-end 139 :post-blank 1 :parent #1) (paragraph
(:begin 103 :end 139 :contents-begin 103 :contents-end 139 :post-blank 0
:post-affiliated 103 :parent #2) #("Rechercher les " 0 15 (:parent #3)) (bold
(:begin 118 :end 131 :contents-begin 119 :contents-end 129 :post-blank 1
:parent #3) #("composants" 0 10 (:parent #4))) #("qui ...\n" 0 8 (:parent
#3)))))))
mapconcat((lambda (element) (org-export-data element info)) ((section (:begin
1 :end 74 :contents-begin 1 :contents-end 73 :post-blank 1 :parent (org-data
nil #1 (headline (:raw-value "Description" :begin 74 :end 140 :pre-blank 1
:contents-begin 89 :contents-end 139 :level 1 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Description" 0 11 ...)) :parent #3) (headline (:raw-value "Objectifs"
:begin 89 :end 140 :pre-blank 1 :contents-begin 103 :contents-end 139 :level 2
:priority nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0
:footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY
"ecm" :title (#("Objectifs" 0 9 ...)) :parent #4) (section (:begin 103 :end 140
:contents-begin 103 :contents-end 139 :post-blank 1 :parent #5) (paragraph ...
#("Rechercher les " 0 15 ...) ... #("qui ...\n" 0 8 ...))))) (headline
(:raw-value "Données" :begin 140 :end 189 :pre-blank 1 :contents-begin 151
:contents-end 189 :level 1 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY "ecm" :title (#("Données" 0 7 ...)) :parent #3)
(headline (:raw-value "Données" :begin 151 :end 189 :pre-blank 1
:contents-begin 163 :contents-end 189 :level 2 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY nil :title (#("Données" 0
7 ...)) :parent #4) (section (:begin 163 :end 189 :contents-begin 163
:contents-end 189 :post-blank 0 :parent #5) (paragraph ... #("Nombre de " 0 10
...) ... #("...\n" 0 4 ...))))))) (keyword (:key "TITLE" :value "ECM" :begin 1
:end 18 :post-blank 0 :post-affiliated 1 :parent #1)) (keyword (:key "OPTIONS"
:value "H:2 texht:t toc:nil" :begin 18 :end 49 :post-blank 0 :post-affiliated
18 :parent #1)) (keyword (:key "BEAMER_THEME" :value "default" :begin 49 :end
73 :post-blank 0 :post-affiliated 49 :parent #1))) (headline (:raw-value
"Description" :begin 74 :end 140 :pre-blank 1 :contents-begin 89 :contents-end
139 :level 1 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY "ecm" :title (#("Description" 0 11 (:parent #1))) :parent
(org-data nil (section (:begin 1 :end 74 :contents-begin 1 :contents-end 73
:post-blank 1 :parent #3) (keyword (:key "TITLE" :value "ECM" :begin 1 :end 18
:post-blank 0 :post-affiliated 1 :parent #4)) (keyword (:key "OPTIONS" :value
"H:2 texht:t toc:nil" :begin 18 :end 49 :post-blank 0 :post-affiliated 18
:parent #4)) (keyword (:key "BEAMER_THEME" :value "default" :begin 49 :end 73
:post-blank 0 :post-affiliated 49 :parent #4))) #1 (headline (:raw-value
"Données" :begin 140 :end 189 :pre-blank 1 :contents-begin 151 :contents-end
189 :level 1 :priority nil :tags nil :todo-keyword nil :todo-type nil
:post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp
nil :CATEGORY "ecm" :title (#("Données" 0 7 ...)) :parent #3) (headline
(:raw-value "Données" :begin 151 :end 189 :pre-blank 1 :contents-begin 163
:contents-end 189 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY nil :title (#("Données" 0 7 ...)) :parent #4) (section
(:begin 163 :end 189 :contents-begin 163 :contents-end 189 :post-blank 0
:parent #5) (paragraph ... #("Nombre de " 0 10 ...) ... #("...\n" 0 4
...))))))) (headline (:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1
:contents-begin 103 :contents-end 139 :level 2 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Objectifs" 0 9 (:parent #2))) :parent #1) (section (:begin 103 :end 140
:contents-begin 103 :contents-end 139 :post-blank 1 :parent #2) (paragraph
(:begin 103 :end 139 :contents-begin 103 :contents-end 139 :post-blank 0
:post-affiliated 103 :parent #3) #("Rechercher les " 0 15 (:parent #4)) (bold
(:begin 118 :end 131 :contents-begin 119 :contents-end 129 :post-blank 1
:parent #4) #("composants" 0 10 (:parent #5))) #("qui ...\n" 0 8 (:parent
#4)))))) (headline (:raw-value "Données" :begin 140 :end 189 :pre-blank 1
:contents-begin 151 :contents-end 189 :level 1 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title (#("Données"
0 7 (:parent #1))) :parent (org-data nil (section (:begin 1 :end 74
:contents-begin 1 :contents-end 73 :post-blank 1 :parent #3) (keyword (:key
"TITLE" :value "ECM" :begin 1 :end 18 :post-blank 0 :post-affiliated 1 :parent
#4)) (keyword (:key "OPTIONS" :value "H:2 texht:t toc:nil" :begin 18 :end 49
:post-blank 0 :post-affiliated 18 :parent #4)) (keyword (:key "BEAMER_THEME"
:value "default" :begin 49 :end 73 :post-blank 0 :post-affiliated 49 :parent
#4))) (headline (:raw-value "Description" :begin 74 :end 140 :pre-blank 1
:contents-begin 89 :contents-end 139 :level 1 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Description" 0 11 ...)) :parent #3) (headline (:raw-value "Objectifs"
:begin 89 :end 140 :pre-blank 1 :contents-begin 103 :contents-end 139 :level 2
:priority nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0
:footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY
"ecm" :title (#("Objectifs" 0 9 ...)) :parent #4) (section (:begin 103 :end 140
:contents-begin 103 :contents-end 139 :post-blank 1 :parent #5) (paragraph ...
#("Rechercher les " 0 15 ...) ... #("qui ...\n" 0 8 ...))))) #1)) (headline
(:raw-value "Données" :begin 151 :end 189 :pre-blank 1 :contents-begin 163
:contents-end 189 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY nil :title (#("Données" 0 7 (:parent #2))) :parent #1)
(section (:begin 163 :end 189 :contents-begin 163 :contents-end 189 :post-blank
0 :parent #2) (paragraph (:begin 163 :end 189 :contents-begin 163 :contents-end
189 :post-blank 0 :post-affiliated 163 :parent #3) #("Nombre de " 0 10 (:parent
#4)) (bold (:begin 173 :end 185 :contents-begin 174 :contents-end 183
:post-blank 1 :parent #4) #("variables" 0 9 (:parent #5))) #("...\n" 0 4
(:parent #4))))))) "")
(let* ((greaterp (memq type org-element-greater-elements)) (objectp (and (not
greaterp) (memq type org-element-recursive-objects))) (contents (mapconcat
(function (lambda (element) (org-export-data element info)))
(org-element-contents (if (or greaterp objectp) data
(org-element-normalize-contents data (if ... ...)))) ""))) (funcall transcoder
data (if (not greaterp) contents (org-element-normalize-string contents)) info))
(progn (let* ((greaterp (memq type org-element-greater-elements)) (objectp
(and (not greaterp) (memq type org-element-recursive-objects))) (contents
(mapconcat (function (lambda (element) (org-export-data element info)))
(org-element-contents (if (or greaterp objectp) data
(org-element-normalize-contents data ...))) ""))) (funcall transcoder data (if
(not greaterp) contents (org-element-normalize-string contents)) info)))
(if transcoder (progn (let* ((greaterp (memq type
org-element-greater-elements)) (objectp (and (not greaterp) (memq type
org-element-recursive-objects))) (contents (mapconcat (function (lambda ...
...)) (org-element-contents (if ... data ...)) ""))) (funcall transcoder data
(if (not greaterp) contents (org-element-normalize-string contents)) info))))
(let ((transcoder (org-export-transcoder data info))) (if transcoder (progn
(let* ((greaterp (memq type org-element-greater-elements)) (objectp (and (not
greaterp) (memq type org-element-recursive-objects))) (contents (mapconcat
(function ...) (org-element-contents ...) ""))) (funcall transcoder data (if
(not greaterp) contents (org-element-normalize-string contents)) info)))))
(cond ((memq data (plist-get info :ignore-list)) nil) ((eq type (quote
plain-text)) (org-export-filter-apply-functions (plist-get info
:filter-plain-text) (let ((transcoder (org-export-transcoder data info))) (if
transcoder (funcall transcoder data info) data)) info)) ((not
(org-export--interpret-p data info)) (org-export-data (org-export-expand data
(mapconcat (function (lambda (blob) (org-export-data blob info)))
(org-element-contents data) "")) info)) ((not type) (mapconcat (function
(lambda (obj) (org-export-data obj info))) data "")) ((or (not
(org-element-contents data)) (and (eq type (quote headline)) (eq (plist-get
info :with-archived-trees) (quote headline)) (org-element-property :archivedp
data))) (let ((transcoder (org-export-transcoder data info))) (or (and
(functionp transcoder) (funcall transcoder data nil info)) (and (eq type (quote
export-snippet)) "")))) (t (let ((transcoder (org-export-transcoder data
info))) (if transcoder (progn (let* ((greaterp ...) (objectp ...) (contents
...)) (funcall transcoder data (if ... contents ...) info)))))))
(let* ((type (org-element-type data)) (results (cond ((memq data (plist-get
info :ignore-list)) nil) ((eq type (quote plain-text))
(org-export-filter-apply-functions (plist-get info :filter-plain-text) (let
(...) (if transcoder ... data)) info)) ((not (org-export--interpret-p data
info)) (org-export-data (org-export-expand data (mapconcat ... ... "")) info))
((not type) (mapconcat (function (lambda ... ...)) data "")) ((or (not
(org-element-contents data)) (and (eq type ...) (eq ... ...)
(org-element-property :archivedp data))) (let ((transcoder ...)) (or (and ...
...) (and ... "")))) (t (let ((transcoder ...)) (if transcoder (progn
...))))))) (puthash data (cond ((not results) nil) ((memq type (quote (org-data
plain-text nil))) results) (t (let ((results (org-export-filter-apply-functions
... ... info))) results))) (plist-get info :exported-data)))
(if (not (eq memo (quote no-memo))) memo (let* ((type (org-element-type
data)) (results (cond ((memq data (plist-get info :ignore-list)) nil) ((eq type
(quote plain-text)) (org-export-filter-apply-functions (plist-get info
:filter-plain-text) (let ... ...) info)) ((not (org-export--interpret-p data
info)) (org-export-data (org-export-expand data ...) info)) ((not type)
(mapconcat (function ...) data "")) ((or (not ...) (and ... ... ...)) (let
(...) (or ... ...))) (t (let (...) (if transcoder ...)))))) (puthash data (cond
((not results) nil) ((memq type (quote (org-data plain-text nil))) results) (t
(let ((results ...)) results))) (plist-get info :exported-data))))
(let ((memo (gethash data (plist-get info :exported-data) (quote no-memo))))
(if (not (eq memo (quote no-memo))) memo (let* ((type (org-element-type data))
(results (cond ((memq data ...) nil) ((eq type ...)
(org-export-filter-apply-functions ... ... info)) ((not ...) (org-export-data
... info)) ((not type) (mapconcat ... data "")) ((or ... ...) (let ... ...)) (t
(let ... ...))))) (puthash data (cond ((not results) nil) ((memq type (quote
...)) results) (t (let (...) results))) (plist-get info :exported-data)))))
org-export-data((org-data nil (section (:begin 1 :end 74 :contents-begin 1
:contents-end 73 :post-blank 1 :parent #0) (keyword (:key "TITLE" :value "ECM"
:begin 1 :end 18 :post-blank 0 :post-affiliated 1 :parent #1)) (keyword (:key
"OPTIONS" :value "H:2 texht:t toc:nil" :begin 18 :end 49 :post-blank 0
:post-affiliated 18 :parent #1)) (keyword (:key "BEAMER_THEME" :value "default"
:begin 49 :end 73 :post-blank 0 :post-affiliated 49 :parent #1))) (headline
(:raw-value "Description" :begin 74 :end 140 :pre-blank 1 :contents-begin 89
:contents-end 139 :level 1 :priority nil :tags nil :todo-keyword nil :todo-type
nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :CATEGORY "ecm" :title (#("Description" 0 11 (:parent #1)))
:parent #0) (headline (:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1
:contents-begin 103 :contents-end 139 :level 2 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title
(#("Objectifs" 0 9 (:parent #2))) :parent #1) (section (:begin 103 :end 140
:contents-begin 103 :contents-end 139 :post-blank 1 :parent #2) (paragraph
(:begin 103 :end 139 :contents-begin 103 :contents-end 139 :post-blank 0
:post-affiliated 103 :parent #3) #("Rechercher les " 0 15 (:parent #4)) (bold
(:begin 118 :end 131 :contents-begin 119 :contents-end 129 :post-blank 1
:parent #4) #("composants" 0 10 (:parent #5))) #("qui ...\n" 0 8 (:parent
#4)))))) (headline (:raw-value "Données" :begin 140 :end 189 :pre-blank 1
:contents-begin 151 :contents-end 189 :level 1 :priority nil :tags nil
:todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title (#("Données"
0 7 (:parent #1))) :parent #0) (headline (:raw-value "Données" :begin 151 :end
189 :pre-blank 1 :contents-begin 163 :contents-end 189 :level 2 :priority nil
:tags nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p
nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY nil :title
(#("Données" 0 7 (:parent #2))) :parent #1) (section (:begin 163 :end 189
:contents-begin 163 :contents-end 189 :post-blank 0 :parent #2) (paragraph
(:begin 163 :end 189 :contents-begin 163 :contents-end 189 :post-blank 0
:post-affiliated 163 :parent #3) #("Nombre de " 0 10 (:parent #4)) (bold
(:begin 173 :end 185 :contents-begin 174 :contents-end 183 :post-blank 1
:parent #4) #("variables" 0 9 (:parent #5))) #("...\n" 0 4 (:parent #4)))))))
(:export-options nil :input-buffer "ecm.txt" :input-file
"d:/Users/fni/Projects/Institutions/Forem/Pfi/PFI/SlideWare/Facteurs-reussite/ecm.txt"
:title ("ECM") :beamer-theme "default" :headline-levels 2 :latex-class
"beamer" :latex-hyperref-p t :date ((latex-fragment (:value "\\today" :begin 1
:end 7 :post-blank 0 :parent #1))) :author ("Fabrice Niessen") :creator "Emacs
24.3.50.1 (Org mode 8.2.1)" :email "address@hidden" :exclude-tags ("noexport")
:language "en" :preserve-breaks nil :section-numbers t :select-tags ("export")
:time-stamp-file t :with-archived-trees headline :with-author t :with-clocks
nil :with-creator comment :with-date t :with-drawers (not "LOGBOOK")
:with-email nil ...))
(or (org-export-data tree info) "")
(org-element-normalize-string (or (org-export-data tree info) ""))
(let* ((body (org-element-normalize-string (or (org-export-data tree info)
""))) (inner-template (cdr (assq (quote inner-template) (plist-get info
:translate-alist)))) (full-body (if (not (functionp inner-template)) body
(funcall inner-template body info))) (template (cdr (assq (quote template)
(plist-get info :translate-alist))))) (org-no-properties
(org-export-filter-apply-functions (plist-get info :filter-final-output) (if
(or (not (functionp template)) body-only) full-body (funcall template full-body
info)) info)))
(progn (run-hook-with-args (quote org-export-before-processing-hook) (progn
(or (and (vectorp backend) (>= (length backend) 8) (memq (aref backend 0)
cl-struct-org-export-backend-tags)) (error "%s accessing a non-%s" (quote
org-export-backend-name) (quote org-export-backend))) (aref backend 1)))
(org-export-expand-include-keyword) (org-macro-initialize-templates)
(org-macro-replace-all org-macro-templates) (org-export-execute-babel-code)
(org-update-radio-target-regexp) (goto-char (point-min)) (save-excursion
(run-hook-with-args (quote org-export-before-parsing-hook) (progn (or (and
(vectorp backend) (>= (length backend) 8) (memq (aref backend 0)
cl-struct-org-export-backend-tags)) (error "%s accessing a non-%s" (quote
org-export-backend-name) (quote org-export-backend))) (aref backend 1)))) (setq
info (org-export-install-filters (org-combine-plists info
(org-export-get-environment backend subtreep ext-plist))))
(org-macro-replace-all (list (cons "author" (org-element-interpret-data
(plist-get info :author))) (cons "date" (org-element-interpret-data (plist-get
info :date))) (cons "email" (or (plist-get info :email) "")) (cons "title"
(org-element-interpret-data (plist-get info :title))))) (let ((backend-name
(progn (or (and (vectorp backend) (>= ... 8) (memq ...
cl-struct-org-export-backend-tags)) (error "%s accessing a non-%s" (quote
org-export-backend-name) (quote org-export-backend))) (aref backend 1))))
(progn (let ((--dolist-tail-- (plist-get info :filter-options)) filter) (while
--dolist-tail-- (setq filter (car --dolist-tail--)) (let ((result ...)) (if
result (progn ...))) (setq --dolist-tail-- (cdr --dolist-tail--)))))) (setq
tree (org-export-filter-apply-functions (plist-get info :filter-parse-tree)
(org-element-parse-buffer nil visible-only) info)) (setq info
(org-combine-plists info (org-export-collect-tree-properties tree info))) (let*
((body (org-element-normalize-string (or (org-export-data tree info) "")))
(inner-template (cdr (assq (quote inner-template) (plist-get info
:translate-alist)))) (full-body (if (not (functionp inner-template)) body
(funcall inner-template body info))) (template (cdr (assq (quote template)
(plist-get info :translate-alist))))) (org-no-properties
(org-export-filter-apply-functions (plist-get info :filter-final-output) (if
(or (not (functionp template)) body-only) full-body (funcall template full-body
info)) info))))
(save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (progn
(run-hook-with-args (quote org-export-before-processing-hook) (progn (or (and
(vectorp backend) (>= (length backend) 8) (memq (aref backend 0)
cl-struct-org-export-backend-tags)) (error "%s accessing a non-%s" (quote
org-export-backend-name) (quote org-export-backend))) (aref backend 1)))
(org-export-expand-include-keyword) (org-macro-initialize-templates)
(org-macro-replace-all org-macro-templates) (org-export-execute-babel-code)
(org-update-radio-target-regexp) (goto-char (point-min)) (save-excursion
(run-hook-with-args (quote org-export-before-parsing-hook) (progn (or (and
(vectorp backend) (>= ... 8) (memq ... cl-struct-org-export-backend-tags))
(error "%s accessing a non-%s" (quote org-export-backend-name) (quote
org-export-backend))) (aref backend 1)))) (setq info
(org-export-install-filters (org-combine-plists info
(org-export-get-environment backend subtreep ext-plist))))
(org-macro-replace-all (list (cons "author" (org-element-interpret-data
(plist-get info :author))) (cons "date" (org-element-interpret-data (plist-get
info :date))) (cons "email" (or (plist-get info :email) "")) (cons "title"
(org-element-interpret-data (plist-get info :title))))) (let ((backend-name
(progn (or (and ... ... ...) (error "%s accessing a non-%s" ... ...)) (aref
backend 1)))) (progn (let ((--dolist-tail-- (plist-get info :filter-options))
filter) (while --dolist-tail-- (setq filter (car --dolist-tail--)) (let (...)
(if result ...)) (setq --dolist-tail-- (cdr --dolist-tail--)))))) (setq tree
(org-export-filter-apply-functions (plist-get info :filter-parse-tree)
(org-element-parse-buffer nil visible-only) info)) (setq info
(org-combine-plists info (org-export-collect-tree-properties tree info))) (let*
((body (org-element-normalize-string (or (org-export-data tree info) "")))
(inner-template (cdr (assq (quote inner-template) (plist-get info
:translate-alist)))) (full-body (if (not (functionp inner-template)) body
(funcall inner-template body info))) (template (cdr (assq (quote template)
(plist-get info :translate-alist))))) (org-no-properties
(org-export-filter-apply-functions (plist-get info :filter-final-output) (if
(or (not ...) body-only) full-body (funcall template full-body info)) info)))))
(unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-char
(point-min)) (progn (run-hook-with-args (quote
org-export-before-processing-hook) (progn (or (and (vectorp backend) (>= ... 8)
(memq ... cl-struct-org-export-backend-tags)) (error "%s accessing a non-%s"
(quote org-export-backend-name) (quote org-export-backend))) (aref backend 1)))
(org-export-expand-include-keyword) (org-macro-initialize-templates)
(org-macro-replace-all org-macro-templates) (org-export-execute-babel-code)
(org-update-radio-target-regexp) (goto-char (point-min)) (save-excursion
(run-hook-with-args (quote org-export-before-parsing-hook) (progn (or (and ...
... ...) (error "%s accessing a non-%s" ... ...)) (aref backend 1)))) (setq
info (org-export-install-filters (org-combine-plists info
(org-export-get-environment backend subtreep ext-plist))))
(org-macro-replace-all (list (cons "author" (org-element-interpret-data
(plist-get info :author))) (cons "date" (org-element-interpret-data (plist-get
info :date))) (cons "email" (or (plist-get info :email) "")) (cons "title"
(org-element-interpret-data (plist-get info :title))))) (let ((backend-name
(progn (or ... ...) (aref backend 1)))) (progn (let ((--dolist-tail-- ...)
filter) (while --dolist-tail-- (setq filter ...) (let ... ...) (setq
--dolist-tail-- ...))))) (setq tree (org-export-filter-apply-functions
(plist-get info :filter-parse-tree) (org-element-parse-buffer nil visible-only)
info)) (setq info (org-combine-plists info (org-export-collect-tree-properties
tree info))) (let* ((body (org-element-normalize-string (or ... "")))
(inner-template (cdr (assq ... ...))) (full-body (if (not ...) body (funcall
inner-template body info))) (template (cdr (assq ... ...)))) (org-no-properties
(org-export-filter-apply-functions (plist-get info :filter-final-output) (if
(or ... body-only) full-body (funcall template full-body info)) info))))) (and
(buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy)
(restore-buffer-modified-p nil)) (kill-buffer --buf-copy))))
(let ((--buf-copy (org-export-copy-buffer))) (unwind-protect
(save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (progn
(run-hook-with-args (quote org-export-before-processing-hook) (progn (or (and
... ... ...) (error "%s accessing a non-%s" ... ...)) (aref backend 1)))
(org-export-expand-include-keyword) (org-macro-initialize-templates)
(org-macro-replace-all org-macro-templates) (org-export-execute-babel-code)
(org-update-radio-target-regexp) (goto-char (point-min)) (save-excursion
(run-hook-with-args (quote org-export-before-parsing-hook) (progn (or ... ...)
(aref backend 1)))) (setq info (org-export-install-filters (org-combine-plists
info (org-export-get-environment backend subtreep ext-plist))))
(org-macro-replace-all (list (cons "author" (org-element-interpret-data ...))
(cons "date" (org-element-interpret-data ...)) (cons "email" (or ... "")) (cons
"title" (org-element-interpret-data ...)))) (let ((backend-name (progn ...
...))) (progn (let (... filter) (while --dolist-tail-- ... ... ...)))) (setq
tree (org-export-filter-apply-functions (plist-get info :filter-parse-tree)
(org-element-parse-buffer nil visible-only) info)) (setq info
(org-combine-plists info (org-export-collect-tree-properties tree info))) (let*
((body (org-element-normalize-string ...)) (inner-template (cdr ...))
(full-body (if ... body ...)) (template (cdr ...))) (org-no-properties
(org-export-filter-apply-functions (plist-get info :filter-final-output) (if
... full-body ...) info))))) (and (buffer-live-p --buf-copy) (progn
(save-current-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil))
(kill-buffer --buf-copy)))))
(let* ((org-export-current-backend (progn (or (and (vectorp backend) (>=
(length backend) 8) (memq (aref backend 0) cl-struct-org-export-backend-tags))
(error "%s accessing a non-%s" (quote org-export-backend-name) (quote
org-export-backend))) (aref backend 1))) (info (org-combine-plists (list
:export-options (delq nil (list (and subtreep ...) (and visible-only ...) (and
body-only ...)))) (org-export--get-buffer-attributes))) tree) (let ((--buf-copy
(org-export-copy-buffer))) (unwind-protect (save-current-buffer (set-buffer
--buf-copy) (goto-char (point-min)) (progn (run-hook-with-args (quote
org-export-before-processing-hook) (progn (or ... ...) (aref backend 1)))
(org-export-expand-include-keyword) (org-macro-initialize-templates)
(org-macro-replace-all org-macro-templates) (org-export-execute-babel-code)
(org-update-radio-target-regexp) (goto-char (point-min)) (save-excursion
(run-hook-with-args (quote org-export-before-parsing-hook) (progn ... ...)))
(setq info (org-export-install-filters (org-combine-plists info ...)))
(org-macro-replace-all (list (cons "author" ...) (cons "date" ...) (cons
"email" ...) (cons "title" ...))) (let ((backend-name ...)) (progn (let ...
...))) (setq tree (org-export-filter-apply-functions (plist-get info
:filter-parse-tree) (org-element-parse-buffer nil visible-only) info)) (setq
info (org-combine-plists info (org-export-collect-tree-properties tree info)))
(let* ((body ...) (inner-template ...) (full-body ...) (template ...))
(org-no-properties (org-export-filter-apply-functions ... ... info))))) (and
(buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy)
(restore-buffer-modified-p nil)) (kill-buffer --buf-copy))))))
(save-restriction (cond ((org-region-active-p) (narrow-to-region
(region-beginning) (region-end))) (subtreep (org-narrow-to-subtree) (goto-char
(point-min)) (forward-line) (narrow-to-region (point) (point-max)))) (let*
((org-export-current-backend (progn (or (and (vectorp backend) (>= ... 8) (memq
... cl-struct-org-export-backend-tags)) (error "%s accessing a non-%s" (quote
org-export-backend-name) (quote org-export-backend))) (aref backend 1))) (info
(org-combine-plists (list :export-options (delq nil (list ... ... ...)))
(org-export--get-buffer-attributes))) tree) (let ((--buf-copy
(org-export-copy-buffer))) (unwind-protect (save-current-buffer (set-buffer
--buf-copy) (goto-char (point-min)) (progn (run-hook-with-args (quote
org-export-before-processing-hook) (progn ... ...))
(org-export-expand-include-keyword) (org-macro-initialize-templates)
(org-macro-replace-all org-macro-templates) (org-export-execute-babel-code)
(org-update-radio-target-regexp) (goto-char (point-min)) (save-excursion
(run-hook-with-args ... ...)) (setq info (org-export-install-filters ...))
(org-macro-replace-all (list ... ... ... ...)) (let (...) (progn ...)) (setq
tree (org-export-filter-apply-functions ... ... info)) (setq info
(org-combine-plists info ...)) (let* (... ... ... ...) (org-no-properties
...)))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer
--buf-copy) (restore-buffer-modified-p nil)) (kill-buffer --buf-copy)))))))
(save-excursion (save-restriction (cond ((org-region-active-p)
(narrow-to-region (region-beginning) (region-end))) (subtreep
(org-narrow-to-subtree) (goto-char (point-min)) (forward-line)
(narrow-to-region (point) (point-max)))) (let* ((org-export-current-backend
(progn (or (and ... ... ...) (error "%s accessing a non-%s" ... ...)) (aref
backend 1))) (info (org-combine-plists (list :export-options (delq nil ...))
(org-export--get-buffer-attributes))) tree) (let ((--buf-copy
(org-export-copy-buffer))) (unwind-protect (save-current-buffer (set-buffer
--buf-copy) (goto-char (point-min)) (progn (run-hook-with-args ... ...)
(org-export-expand-include-keyword) (org-macro-initialize-templates)
(org-macro-replace-all org-macro-templates) (org-export-execute-babel-code)
(org-update-radio-target-regexp) (goto-char ...) (save-excursion ...) (setq
info ...) (org-macro-replace-all ...) (let ... ...) (setq tree ...) (setq info
...) (let* ... ...))) (and (buffer-live-p --buf-copy) (progn
(save-current-buffer ... ...) (kill-buffer --buf-copy))))))))
org-export-as(beamer nil nil nil nil)
(let ((output (org-export-as backend subtreep visible-only body-only
ext-plist))) (let ((temp-buffer (generate-new-buffer " *temp*")))
(save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert
output) (let ((coding-system-for-write encoding)) (write-file file))) (and
(buffer-name temp-buffer) (kill-buffer temp-buffer))))) (if (and
(org-export--copy-to-kill-ring-p) (org-string-nw-p output)) (progn
(org-kill-new output))) (or (and (functionp post-process) (funcall post-process
file)) file))
(if async (let ((with-temp-message "Initializing asynchronous export
process") (current-message)) (unwind-protect (progn (if with-temp-message
(progn (setq current-message (current-message)) (message "%s"
with-temp-message))) (let ((--copy-fun (org-export--generate-copy-script ...))
(--temp-file (make-temp-file "org-export-process")) (--coding
buffer-file-coding-system)) (let ((temp-file --temp-file) (temp-buffer ...))
(unwind-protect (prog1 ... ...) (and ... ...))) (let* ((process-connection-type
nil) (--proc-buffer ...) (--process ...)) (org-export-add-to-stack (get-buffer
--proc-buffer) nil --process) (let (...) (set-process-sentinel --process
...))))) (and with-temp-message (if current-message (message "%s"
current-message) (message nil))))) (let ((output (org-export-as backend
subtreep visible-only body-only ext-plist))) (let ((temp-buffer
(generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer)
(unwind-protect (progn (insert output) (let (...) (write-file file))) (and
(buffer-name temp-buffer) (kill-buffer temp-buffer))))) (if (and
(org-export--copy-to-kill-ring-p) (org-string-nw-p output)) (progn
(org-kill-new output))) (or (and (functionp post-process) (funcall post-process
file)) file)))
(let ((encoding (or org-export-coding-system buffer-file-coding-system))) (if
async (let ((with-temp-message "Initializing asynchronous export process")
(current-message)) (unwind-protect (progn (if with-temp-message (progn (setq
current-message ...) (message "%s" with-temp-message))) (let ((--copy-fun ...)
(--temp-file ...) (--coding buffer-file-coding-system)) (let (... ...)
(unwind-protect ... ...)) (let* (... ... ...) (org-export-add-to-stack ... nil
--process) (let ... ...)))) (and with-temp-message (if current-message (message
"%s" current-message) (message nil))))) (let ((output (org-export-as backend
subtreep visible-only body-only ext-plist))) (let ((temp-buffer
(generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer)
(unwind-protect (progn (insert output) (let ... ...)) (and (buffer-name
temp-buffer) (kill-buffer temp-buffer))))) (if (and
(org-export--copy-to-kill-ring-p) (org-string-nw-p output)) (progn
(org-kill-new output))) (or (and (functionp post-process) (funcall post-process
file)) file))))
(if (not (file-writable-p file)) (error "Output file not writable") (let
((encoding (or org-export-coding-system buffer-file-coding-system))) (if async
(let ((with-temp-message "Initializing asynchronous export process")
(current-message)) (unwind-protect (progn (if with-temp-message (progn ...
...)) (let (... ... ...) (let ... ...) (let* ... ... ...))) (and
with-temp-message (if current-message (message "%s" current-message) (message
nil))))) (let ((output (org-export-as backend subtreep visible-only body-only
ext-plist))) (let ((temp-buffer (generate-new-buffer " *temp*")))
(save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn ... ...)
(and ... ...)))) (if (and (org-export--copy-to-kill-ring-p) (org-string-nw-p
output)) (progn (org-kill-new output))) (or (and (functionp post-process)
(funcall post-process file)) file)))))
org-export-to-file(beamer "./ecm.tex" nil nil nil nil nil (lambda (file)
(org-latex-compile file)))
(let ((file (org-export-output-file-name ".tex" subtreep)))
(org-export-to-file (quote beamer) file async subtreep visible-only body-only
ext-plist (function (lambda (file) (org-latex-compile file)))))
org-beamer-export-to-pdf(nil nil nil nil)
(org-open-file (org-beamer-export-to-pdf nil s v b))
(if a (org-beamer-export-to-pdf t s v b) (org-open-file
(org-beamer-export-to-pdf nil s v b)))
(lambda (a s v b) (if a (org-beamer-export-to-pdf t s v b) (org-open-file
(org-beamer-export-to-pdf nil s v b))))(nil nil nil nil)
funcall((lambda (a s v b) (if a (org-beamer-export-to-pdf t s v b)
(org-open-file (org-beamer-export-to-pdf nil s v b)))) nil nil nil nil)
(save-excursion (if arg (progn (if (eq (marker-buffer
org-export-dispatch-last-position) (org-base-buffer (current-buffer)))
(goto-char org-export-dispatch-last-position) (move-marker
org-export-dispatch-last-position nil)))) (funcall action (and (memq (quote
async) optns) t) (and (memq (quote subtree) optns) t) (and (memq (quote
visible) optns) t) (and (memq (quote body) optns) t)))
(cond ((eql action (quote template)) (org-export-insert-default-template nil
optns)) ((eql action (quote stack)) (org-export-stack)) ((eql action (quote
publish-current-file)) (org-publish-current-file (memq (quote force) optns)
(memq (quote async) optns))) ((eql action (quote publish-current-project))
(org-publish-current-project (memq (quote force) optns) (memq (quote async)
optns))) ((eql action (quote publish-choose-project)) (org-publish (assoc
(org-icompleting-read "Publish project: " org-publish-project-alist nil t)
org-publish-project-alist) (memq (quote force) optns) (memq (quote async)
optns))) ((eql action (quote publish-all)) (org-publish-all (memq (quote force)
optns) (memq (quote async) optns))) (t (save-excursion (if arg (progn (if (eq
(marker-buffer org-export-dispatch-last-position) (org-base-buffer ...))
(goto-char org-export-dispatch-last-position) (move-marker
org-export-dispatch-last-position nil)))) (funcall action (and (memq (quote
async) optns) t) (and (memq (quote subtree) optns) t) (and (memq (quote
visible) optns) t) (and (memq (quote body) optns) t)))))
(let* ((input (cond ((equal arg (quote (16))) (quote (stack))) ((and arg
org-export-dispatch-last-action)) (t (let ((wconfig ...)) (unwind-protect
(progn ...) (set-window-configuration wconfig)))))) (action (car input)) (optns
(cdr input))) (if (memq (quote subtree) optns) nil (move-marker
org-export-dispatch-last-position nil)) (cond ((eql action (quote template))
(org-export-insert-default-template nil optns)) ((eql action (quote stack))
(org-export-stack)) ((eql action (quote publish-current-file))
(org-publish-current-file (memq (quote force) optns) (memq (quote async)
optns))) ((eql action (quote publish-current-project))
(org-publish-current-project (memq (quote force) optns) (memq (quote async)
optns))) ((eql action (quote publish-choose-project)) (org-publish (assoc
(org-icompleting-read "Publish project: " org-publish-project-alist nil t)
org-publish-project-alist) (memq (quote force) optns) (memq (quote async)
optns))) ((eql action (quote publish-all)) (org-publish-all (memq (quote force)
optns) (memq (quote async) optns))) (t (save-excursion (if arg (progn (if (eq
... ...) (goto-char org-export-dispatch-last-position) (move-marker
org-export-dispatch-last-position nil)))) (funcall action (and (memq (quote
async) optns) t) (and (memq (quote subtree) optns) t) (and (memq (quote
visible) optns) t) (and (memq (quote body) optns) t))))))
org-export-dispatch()
--8<---------------cut here---------------end--------------->8---
I don't understand what this means... nor how to fix it.
Environment:
- GNU Emacs 24.3.50.1 (i686-pc-mingw32) of 2013-10-19 on LEG570
- Org-mode version 8.2.1 (release_8.2.1-202-gea797e.dirty @
~/Public/Repositories/org-mode/lisp/)
Best regards,
Seb
--
Sebastien Vauban
- [O] Beamer--Lisp error: (wrong-type-argument buffer-or-string-p t),
Sebastien Vauban <=