From mboxrd@z Thu Jan 1 00:00:00 1970 From: "Sebastien Vauban" Subject: Beamer--Lisp error: (wrong-type-argument buffer-or-string-p t) Date: Thu, 07 Nov 2013 16:56:08 +0100 Message-ID: <861u2smciv.fsf@somewhere.org> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Return-path: List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org-mXXj517/zsQ@public.gmane.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org-mXXj517/zsQ@public.gmane.org To: emacs-orgmode-mXXj517/zsQ@public.gmane.org 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=C3=A9es ** Donn=C3=A9es 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-sectionni= ng) level numberedp) (nth (1+ level) class-sectionning)) (let ((sec (if (functionp (nth 2 class-sectionning)) (funcall (nth 2 clas= s-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= ")) ((=3D (length sec) 2) (if numberedp (progn (concat (car sec) "\n%s" (nt= h 1 sec))))) ((=3D (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-relat= ive-level headline info)) (numberedp (org-export-numbered-headline-p headli= ne 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")) ((=3D (length sec) 2)= (if numberedp (progn ...))) ((=3D (length sec) 4) (if numberedp (concat ..= . "\n%s" ...) (concat ... "\n%s" ...)))))) (text (org-export-data (org-elem= ent-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-prop= erty :todo-type headline))) (tags (and (plist-get info :with-tags) (org-exp= ort-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-lab= el (format "\\label{sec-%s}\n" (mapconcat (quote number-to-string) (org-exp= ort-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]*\\'" (form= at "\n\\\\end{%s}" (if numberedp (quote enumerate) (quote itemize))) low-le= vel-body))) (let ((opt-title (funcall org-latex-format-headline-function to= do todo-type priority (org-export-data (org-export-get-alt-title headline i= nfo) info) (and (eq ... t) tags)))) (if (and numberedp opt-title (not (equa= l 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 headl= ine info)) (numberedp (org-export-numbered-headline-p headline info)) (clas= s-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")) ((=3D ... 2) (if numberedp ...)) ((=3D ... 4)= (if numberedp ... ...))))) (text (org-export-data (org-element-property :t= itle 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 :w= ith-tags) (org-export-get-tags headline info))) (priority (and (plist-get i= nfo :with-priority) (org-element-property :priority headline))) (full-text = (funcall org-latex-format-headline-function todo todo-type priority text ta= gs)) (headline-label (format "\\label{sec-%s}\n" (mapconcat (quote number-t= o-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 co= ntents))) (if (not (org-export-last-sibling-p headline info)) low-level-bod= y (replace-regexp-in-string "[ \n]*\\'" (format "\n\\\\end{%s}" (if number= edp ... ...)) 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 "\\[" "(" (repla= ce-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) (keywo= rd (:key "TITLE" :value "ECM" :begin 1 :end 18 :post-blank 0 :post-affiliat= ed 1 :parent #3)) (keyword (:key "OPTIONS" :value "H:2 texht:t toc:nil" :be= gin 18 :end 49 :post-blank 0 :post-affiliated 18 :parent #3)) (keyword (:ke= y "BEAMER_THEME" :value "default" :begin 49 :end 73 :post-blank 0 :post-aff= iliated 49 :parent #3))) #0 (headline (:raw-value "Donn=C3=A9es" :begin 140= :end 189 :pre-blank 1 :contents-begin 151 :contents-end 189 :level 1 :prio= rity 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=C3=A9es" 0 7 (:parent #3))) :parent #2) (headline (:raw-val= ue "Donn=C3=A9es" :begin 151 :end 189 :pre-blank 1 :contents-begin 163 :con= tents-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=C3=A9es" 0 7 ...)) :parent #3) (s= ection (:begin 163 :end 189 :contents-begin 163 :contents-end 189 :post-bla= nk 0 :parent #4) (paragraph (:begin 163 :end 189 :contents-begin 163 :conte= nts-end 189 :post-blank 0 :post-affiliated 163 :parent #5) #("Nombre de " 0= 10 ...) (bold ... #("variables" 0 9 ...)) #("...\n" 0 4 ...))))))) (headli= ne (: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 :t= odo-type nil :post-blank 0 :footnote-section-p nil :archivedp nil :commente= dp nil :quotedp nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:parent #1))= ) :parent #0) (section (:begin 103 :end 140 :contents-begin 103 :contents-e= nd 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= =3Dsec-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 :priori= ty nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-s= ection-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :t= itle (#("Objectifs" 0 9 (:parent #2))) :parent (headline (:raw-value "Descr= iption" :begin 74 :end 140 :pre-blank 1 :contents-begin 89 :contents-end 13= 9 :level 1 :priority nil :tags nil :todo-keyword nil :todo-type nil :post-b= lank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil = :CATEGORY "ecm" :title (#("Description" 0 11 ...)) :parent (org-data nil (s= ection ... ... ... ...) #4 (headline ... ...))) #2)) (section (:begin 103 := end 140 :contents-begin 103 :contents-end 139 :post-blank 1 :parent #2) (pa= ragraph (:begin 103 :end 139 :contents-begin 103 :contents-end 139 :post-bl= ank 0 :post-affiliated 103 :parent #3) #("Rechercher les " 0 15 (:parent #4= )) (bold (:begin 118 :end 131 :contents-begin 119 :contents-end 129 :post-b= lank 1 :parent #4) #("composants" 0 10 (:parent #5))) #("qui ...\n" 0 8 (:p= arent #4)))))) 40 55 (:parent (paragraph (:begin 103 :end 139 :contents-beg= in 103 :contents-end 139 :post-blank 0 :post-affiliated 103 :parent (sectio= n (: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 :archived= p 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) #("composa= nts" 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-en= d 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-affiliate= d 103 :parent (section (:begin 103 :end 140 :contents-begin 103 :contents-e= nd 139 :post-blank 1 :parent (headline (:raw-value "Objectifs" :begin 89 :e= nd 140 :pre-blank 1 :contents-begin 103 :contents-end 139 :level 2 :priorit= y nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-se= ction-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :ti= tle ... :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/fn= i/Projects/Institutions/Forem/Pfi/PFI/SlideWare/Facteurs-reussite/ecm.txt" = :title ("ECM") :beamer-theme "default" :headline-levels 2 :latex-class "bea= mer" :latex-hyperref-p t :date ((latex-fragment (:value "\\today" :begin 1 = :end 7 :post-blank 0 :parent #1))) :author ("Fabrice Niessen") :creator "Em= acs 24.3.50.1 (Org mode 8.2.1)" :email "fni-djc/iPCCuDYQheJpep6IedvLeJWuRmrY@public.gmane.org" :exclude= -tags ("noexport") :language "en" :preserve-breaks nil :section-numbers t := select-tags ("export") :time-stamp-file t :with-archived-trees headline :wi= th-author t :with-clocks nil :with-creator comment :with-date t :with-drawe= rs (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 :priori= ty nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-s= ection-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :t= itle (#("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)) (keyw= ord (:key "BEAMER_THEME" :value "default" :begin 49 :end 73 :post-blank 0 := post-affiliated 49 :parent #3))) #0 (headline (:raw-value "Donn=C3=A9es" :b= egin 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 :CATEGOR= Y "ecm" :title (#("Donn=C3=A9es" 0 7 (:parent #3))) :parent #2) (headline (= :raw-value "Donn=C3=A9es" :begin 151 :end 189 :pre-blank 1 :contents-begin = 163 :contents-end 189 :level 2 :priority nil :tags nil :todo-keyword nil :t= odo-type nil :post-blank 0 :footnote-section-p nil :archivedp nil :commente= dp nil :quotedp nil :CATEGORY nil :title (#("Donn=C3=A9es" 0 7 ...)) :paren= t #3) (section (:begin 163 :end 189 :contents-begin 163 :contents-end 189 := post-blank 0 :parent #4) (paragraph (:begin 163 :end 189 :contents-begin 16= 3 :contents-end 189 :post-blank 0 :post-affiliated 163 :parent #5) #("Nombr= e de " 0 10 ...) (bold ... #("variables" 0 9 ...)) #("...\n" 0 4 ...)))))))= (headline (:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1 :content= s-begin 103 :contents-end 139 :level 2 :priority nil :tags nil :todo-keywor= d nil :todo-type nil :post-blank 0 :footnote-section-p nil :archivedp nil := commentedp nil :quotedp nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:par= ent #1))) :parent #0) (section (:begin 103 :end 140 :contents-begin 103 :co= ntents-end 139 :post-blank 1 :parent #1) (paragraph (:begin 103 :end 139 :c= ontents-begin 103 :contents-end 139 :post-blank 0 :post-affiliated 103 :par= ent #2) #("Rechercher les " 0 15 (:parent #3)) (bold (:begin 118 :end 131 := contents-begin 119 :contents-end 129 :post-blank 1 :parent #3) #("composant= s" 0 10 (:parent #4))) #("qui ...\n" 0 8 (:parent #3)))))) #("\\begin{frame= }[label=3Dsec-1-1]{Objectifs}\nRechercher les \\alert{composants} qui \\ldo= ts{}\n\\end{frame}\n" 29 38 (:parent (headline (:raw-value "Objectifs" :beg= in 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 :foo= tnote-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 :quote= dp nil :CATEGORY "ecm" :title (#("Description" 0 11 ...)) :parent (org-data= nil (section ... ... ... ...) #4 (headline ... ...))) #2)) (section (:begi= n 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 (:pa= rent #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 :conte= nts-begin 103 :contents-end 139 :post-blank 0 :post-affiliated 103 :parent = (section (:begin 103 :end 140 :contents-begin 103 :contents-end 139 :post-b= lank 1 :parent (headline (:raw-value "Objectifs" :begin 89 :end 140 :pre-bl= ank 1 :contents-begin 103 :contents-end 139 :level 2 :priority nil :tags ni= l :todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil :a= rchivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title ... :paren= t ...) #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 (:p= arent (bold (:begin 118 :end 131 :contents-begin 119 :contents-end 129 :pos= t-blank 1 :parent (paragraph (:begin 103 :end 139 :contents-begin 103 :cont= ents-end 139 :post-blank 0 :post-affiliated 103 :parent (section (:begin 10= 3 :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 (:begi= n 103 :end 139 :contents-begin 103 :contents-end 139 :post-blank 0 :post-af= filiated 103 :parent (section (:begin 103 :end 140 :contents-begin 103 :con= tents-end 139 :post-blank 1 :parent (headline (:raw-value "Objectifs" :begi= n 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 :foot= note-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "e= cm" :title ... :parent ...) #4)) #2)) #("Rechercher les " 0 15 (:parent #2)= ) (bold (:begin 118 :end 131 :contents-begin 119 :contents-end 129 :post-bl= ank 1 :parent #2) #("composants" 0 10 (:parent #3))) #("qui ...\n" 0 8 (:pa= rent #2))))) (:export-options nil :input-buffer "ecm.txt" :input-file "d:/U= sers/fni/Projects/Institutions/Forem/Pfi/PFI/SlideWare/Facteurs-reussite/ec= m.txt" :title ("ECM") :beamer-theme "default" :headline-levels 2 :latex-cla= ss "beamer" :latex-hyperref-p t :date ((latex-fragment (:value "\\today" :b= egin 1 :end 7 :post-blank 0 :parent #1))) :author ("Fabrice Niessen") :crea= tor "Emacs 24.3.50.1 (Org mode 8.2.1)" :email "fni-djc/iPCCuDYQheJpep6IedvLeJWuRmrY@public.gmane.org" := exclude-tags ("noexport") :language "en" :preserve-breaks nil :section-numb= ers t :select-tags ("export") :time-stamp-file t :with-archived-trees headl= ine :with-author t :with-clocks nil :with-creator comment :with-date t :wit= h-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-en= d backend :translate-alist all-transcoders :exported-data (make-hash-table = :test (quote eq) :size 401))))) (let* ((all-transcoders (org-export-get-all-transcoders backend)) (transc= oder (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-trans= coders :exported-data (make-hash-table :test (quote eq) :size 401)))))) (if (memq type (quote (nil org-data))) (error "No foreign transcoder avai= lable") (let* ((all-transcoders (org-export-get-all-transcoders backend)) (= transcoder (cdr (assq type all-transcoders)))) (if (not (functionp transcod= er)) (error "No foreign transcoder available") (funcall transcoder data con= tents (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-transc= oders)))) (if (not (functionp transcoder)) (error "No foreign transcoder av= ailable") (funcall transcoder data contents (org-combine-plists info (list = :back-end backend :translate-alist all-transcoders :exported-data (make-has= h-table :test ... :size 401)))))))) org-export-with-backend([cl-struct-org-export-backend nil latex ((bold la= mbda (object contents info) (let ((code (org-export-with-backend (quote bea= mer) object contents info))) (if (org-string-nw-p code) (concat "\\protect"= code) code))) (footnote-reference lambda (object contents info) (let ((cod= e (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 c= ontents info))) (if (org-string-nw-p code) (concat "\\protect" code) code))= ) (strike-through lambda (object contents info) (let ((code (org-export-wit= h-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 l= ambda (object contents info) (let ((code (org-export-with-backend (quote be= amer) object contents info))) (if (org-string-nw-p code) (concat "\\protect= " code) code)))) nil nil nil nil] (headline (:raw-value "Description" :begi= n 74 :end 140 :pre-blank 1 :contents-begin 89 :contents-end 139 :level 1 :p= riority nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0 :footn= ote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "ec= m" :title (#("Description" 0 11 (:parent #0))) :parent (org-data nil (secti= on (:begin 1 :end 74 :contents-begin 1 :contents-end 73 :post-blank 1 :pare= nt #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-blan= k 0 :post-affiliated 49 :parent #3))) #0 (headline (:raw-value "Donn=C3=A9e= s" :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-blan= k 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CA= TEGORY "ecm" :title (#("Donn=C3=A9es" 0 7 (:parent #3))) :parent #2) (headl= ine (:raw-value "Donn=C3=A9es" :begin 151 :end 189 :pre-blank 1 :contents-b= egin 163 :contents-end 189 :level 2 :priority nil :tags nil :todo-keyword n= il :todo-type nil :post-blank 0 :footnote-section-p nil :archivedp nil :com= mentedp nil :quotedp nil :CATEGORY nil :title (#("Donn=C3=A9es" 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-beg= in 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 :co= ntents-begin 103 :contents-end 139 :level 2 :priority nil :tags nil :todo-k= eyword 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 10= 3 :contents-end 139 :post-blank 1 :parent #1) (paragraph (:begin 103 :end 1= 39 :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) #("comp= osants" 0 10 (:parent #4))) #("qui ...\n" 0 8 (:parent #3)))))) #("\\begin{= frame}[label=3Dsec-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 :lev= el 2 :priority nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0= :footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEG= ORY "ecm" :title (#("Objectifs" 0 9 (:parent #2))) :parent (headline (:raw-= value "Description" :begin 74 :end 140 :pre-blank 1 :contents-begin 89 :con= tents-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 :pa= rent #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 :pa= rent (section (:begin 103 :end 140 :contents-begin 103 :contents-end 139 :p= ost-blank 1 :parent (headline (:raw-value "Objectifs" :begin 89 :end 140 :p= re-blank 1 :contents-begin 103 :contents-end 139 :level 2 :priority nil :ta= gs nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p n= il :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 7= 2 (: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 (:beg= in 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 (:pa= rent #4)))) #("composants" 0 10 (:parent #2)))) 74 78 (:parent (paragraph (= :begin 103 :end 139 :contents-begin 103 :contents-end 139 :post-blank 0 :po= st-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 :leve= l 2 :priority nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0 = :footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGO= RY "ecm" :title ... :parent ...) #4)) #2)) #("Rechercher les " 0 15 (:paren= t #2)) (bold (:begin 118 :end 131 :contents-begin 119 :contents-end 129 :po= st-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-reussi= te/ecm.txt" :title ("ECM") :beamer-theme "default" :headline-levels 2 :late= x-class "beamer" :latex-hyperref-p t :date ((latex-fragment (:value "\\toda= y" :begin 1 :end 7 :post-blank 0 :parent #1))) :author ("Fabrice Niessen") = :creator "Emacs 24.3.50.1 (Org mode 8.2.1)" :email "fni@missioncriticalit.c= om" :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-elem= ent-property :BEAMER_ACT headline))) (if (and mode-specs (string-match "\\`= \\\\\\(.*?\\)\\(?:\\*\\|\\[.*\\]\\)?{" latex-headline)) (replace-match (con= cat (match-string 1 latex-headline) (format "<%s>" mode-specs)) nil nil lat= ex-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 :priori= ty nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-s= ection-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :t= itle (#("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)) (keyw= ord (:key "BEAMER_THEME" :value "default" :begin 49 :end 73 :post-blank 0 := post-affiliated 49 :parent #3))) #0 (headline (:raw-value "Donn=C3=A9es" :b= egin 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 :CATEGOR= Y "ecm" :title (#("Donn=C3=A9es" 0 7 (:parent #3))) :parent #2) (headline (= :raw-value "Donn=C3=A9es" :begin 151 :end 189 :pre-blank 1 :contents-begin = 163 :contents-end 189 :level 2 :priority nil :tags nil :todo-keyword nil :t= odo-type nil :post-blank 0 :footnote-section-p nil :archivedp nil :commente= dp nil :quotedp nil :CATEGORY nil :title (#("Donn=C3=A9es" 0 7 ...)) :paren= t #3) (section (:begin 163 :end 189 :contents-begin 163 :contents-end 189 := post-blank 0 :parent #4) (paragraph (:begin 163 :end 189 :contents-begin 16= 3 :contents-end 189 :post-blank 0 :post-affiliated 163 :parent #5) #("Nombr= e de " 0 10 ...) (bold ... #("variables" 0 9 ...)) #("...\n" 0 4 ...)))))))= (headline (:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1 :content= s-begin 103 :contents-end 139 :level 2 :priority nil :tags nil :todo-keywor= d nil :todo-type nil :post-blank 0 :footnote-section-p nil :archivedp nil := commentedp nil :quotedp nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:par= ent #1))) :parent #0) (section (:begin 103 :end 140 :contents-begin 103 :co= ntents-end 139 :post-blank 1 :parent #1) (paragraph (:begin 103 :end 139 :c= ontents-begin 103 :contents-end 139 :post-blank 0 :post-affiliated 103 :par= ent #2) #("Rechercher les " 0 15 (:parent #3)) (bold (:begin 118 :end 131 := contents-begin 119 :contents-end 129 :post-blank 1 :parent #3) #("composant= s" 0 10 (:parent #4))) #("qui ...\n" 0 8 (:parent #3)))))) #("\\begin{frame= }[label=3Dsec-1-1]{Objectifs}\nRechercher les \\alert{composants} qui \\ldo= ts{}\n\\end{frame}\n" 29 38 (:parent (headline (:raw-value "Objectifs" :beg= in 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 :foo= tnote-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 :quote= dp nil :CATEGORY "ecm" :title (#("Description" 0 11 ...)) :parent (org-data= nil (section ... ... ... ...) #4 (headline ... ...))) #2)) (section (:begi= n 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 (:pa= rent #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 :conte= nts-begin 103 :contents-end 139 :post-blank 0 :post-affiliated 103 :parent = (section (:begin 103 :end 140 :contents-begin 103 :contents-end 139 :post-b= lank 1 :parent (headline (:raw-value "Objectifs" :begin 89 :end 140 :pre-bl= ank 1 :contents-begin 103 :contents-end 139 :level 2 :priority nil :tags ni= l :todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil :a= rchivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title ... :paren= t ...) #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 (:p= arent (bold (:begin 118 :end 131 :contents-begin 119 :contents-end 129 :pos= t-blank 1 :parent (paragraph (:begin 103 :end 139 :contents-begin 103 :cont= ents-end 139 :post-blank 0 :post-affiliated 103 :parent (section (:begin 10= 3 :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 (:begi= n 103 :end 139 :contents-begin 103 :contents-end 139 :post-blank 0 :post-af= filiated 103 :parent (section (:begin 103 :end 140 :contents-begin 103 :con= tents-end 139 :post-blank 1 :parent (headline (:raw-value "Objectifs" :begi= n 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 :foot= note-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "e= cm" :title ... :parent ...) #4)) #2)) #("Rechercher les " 0 15 (:parent #2)= ) (bold (:begin 118 :end 131 :contents-begin 119 :contents-end 129 :post-bl= ank 1 :parent #2) #("composants" 0 10 (:parent #3))) #("qui ...\n" 0 8 (:pa= rent #2))))) (:export-options nil :input-buffer "ecm.txt" :input-file "d:/U= sers/fni/Projects/Institutions/Forem/Pfi/PFI/SlideWare/Facteurs-reussite/ec= m.txt" :title ("ECM") :beamer-theme "default" :headline-levels 2 :latex-cla= ss "beamer" :latex-hyperref-p t :date ((latex-fragment (:value "\\today" :b= egin 1 :end 7 :post-blank 0 :parent #1))) :author ("Fabrice Niessen") :crea= tor "Emacs 24.3.50.1 (Org mode 8.2.1)" :email "fni-djc/iPCCuDYQheJpep6IedvLeJWuRmrY@public.gmane.org" := exclude-tags ("noexport") :language "en" :preserve-breaks nil :section-numb= ers t :select-tags ("export") :time-stamp-file t :with-archived-trees headl= ine :with-author t :with-clocks nil :with-creator comment :with-date t :wit= h-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 "\\againfr= ame" (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 environmen= t "ignoreheading") (concat (make-string (org-element-property :pre-blank he= adline) 10) contents)) ((member environment (quote ("note" "noteNH"))) (for= mat "\\note{%s}" (concat (and (equal environment "note") (concat (org-expor= t-data (org-element-property :title headline) info) "\n")) (org-trim conten= ts)))) ((=3D level frame-level) (org-beamer--format-frame headline contents= info)) ((< level frame-level) (org-beamer--format-section headline content= s 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-eleme= nt-property :BEAMER_ENV headline))) (or (org-string-nw-p env) "block")))) (= cond ((equal environment "againframe") (let ((ref (org-element-property :BE= AMER_REF headline))) (if (org-string-nw-p ref) (progn (concat "\\againframe= " (let ... ...) (let ... ...) (let* ... ...)))))) ((equal environment "appe= ndix") (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-proper= ty :pre-blank headline) 10) contents)) ((member environment (quote ("note" = "noteNH"))) (format "\\note{%s}" (concat (and (equal environment "note") (c= oncat (org-export-data ... info) "\n")) (org-trim contents)))) ((=3D level = frame-level) (org-beamer--format-frame headline contents info)) ((< level f= rame-level) (org-beamer--format-section headline contents info)) (t (org-be= amer--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--fr= ame-level headline info)) (environment (let ((env (org-element-property :BE= AMER_ENV headline))) (or (org-string-nw-p env) "block")))) (cond ((equal en= vironment "againframe") (let ((ref (org-element-property :BEAMER_REF headli= ne))) (if (org-string-nw-p ref) (progn (concat "\\againframe" ... ... ...))= ))) ((equal environment "appendix") (concat "\\appendix" (org-element-prope= rty :BEAMER_ACT headline) "\n" (make-string (org-element-property :pre-blan= k headline) 10) contents)) ((equal environment "ignoreheading") (concat (ma= ke-string (org-element-property :pre-blank headline) 10) contents)) ((membe= r environment (quote ("note" "noteNH"))) (format "\\note{%s}" (concat (and = (equal environment "note") (concat ... "\n")) (org-trim contents)))) ((=3D = level frame-level) (org-beamer--format-frame headline contents info)) ((< l= evel 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 14= 0 :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) (keyw= ord (:key "TITLE" :value "ECM" :begin 1 :end 18 :post-blank 0 :post-affilia= ted 1 :parent #3)) (keyword (:key "OPTIONS" :value "H:2 texht:t toc:nil" :b= egin 18 :end 49 :post-blank 0 :post-affiliated 18 :parent #3)) (keyword (:k= ey "BEAMER_THEME" :value "default" :begin 49 :end 73 :post-blank 0 :post-af= filiated 49 :parent #3))) #0 (headline (:raw-value "Donn=C3=A9es" :begin 14= 0 :end 189 :pre-blank 1 :contents-begin 151 :contents-end 189 :level 1 :pri= ority nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0 :footnot= e-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm"= :title (#("Donn=C3=A9es" 0 7 (:parent #3))) :parent #2) (headline (:raw-va= lue "Donn=C3=A9es" :begin 151 :end 189 :pre-blank 1 :contents-begin 163 :co= ntents-end 189 :level 2 :priority nil :tags nil :todo-keyword nil :todo-typ= e nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil = :quotedp nil :CATEGORY nil :title (#("Donn=C3=A9es" 0 7 ...)) :parent #3) (= section (:begin 163 :end 189 :contents-begin 163 :contents-end 189 :post-bl= ank 0 :parent #4) (paragraph (:begin 163 :end 189 :contents-begin 163 :cont= ents-end 189 :post-blank 0 :post-affiliated 163 :parent #5) #("Nombre de " = 0 10 ...) (bold ... #("variables" 0 9 ...)) #("...\n" 0 4 ...))))))) (headl= ine (: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 :comment= edp 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 :content= s-begin 119 :contents-end 129 :post-blank 1 :parent #3) #("composants" 0 10= (:parent #4))) #("qui ...\n" 0 8 (:parent #3)))))) #("\\begin{frame}[label= =3Dsec-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 :priori= ty nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-s= ection-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :t= itle (#("Objectifs" 0 9 (:parent #2))) :parent (headline (:raw-value "Descr= iption" :begin 74 :end 140 :pre-blank 1 :contents-begin 89 :contents-end 13= 9 :level 1 :priority nil :tags nil :todo-keyword nil :todo-type nil :post-b= lank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil = :CATEGORY "ecm" :title (#("Description" 0 11 ...)) :parent (org-data nil (s= ection ... ... ... ...) #4 (headline ... ...))) #2)) (section (:begin 103 := end 140 :contents-begin 103 :contents-end 139 :post-blank 1 :parent #2) (pa= ragraph (:begin 103 :end 139 :contents-begin 103 :contents-end 139 :post-bl= ank 0 :post-affiliated 103 :parent #3) #("Rechercher les " 0 15 (:parent #4= )) (bold (:begin 118 :end 131 :contents-begin 119 :contents-end 129 :post-b= lank 1 :parent #4) #("composants" 0 10 (:parent #5))) #("qui ...\n" 0 8 (:p= arent #4)))))) 40 55 (:parent (paragraph (:begin 103 :end 139 :contents-beg= in 103 :contents-end 139 :post-blank 0 :post-affiliated 103 :parent (sectio= n (: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 :archived= p 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) #("composa= nts" 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-en= d 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-affiliate= d 103 :parent (section (:begin 103 :end 140 :contents-begin 103 :contents-e= nd 139 :post-blank 1 :parent (headline (:raw-value "Objectifs" :begin 89 :e= nd 140 :pre-blank 1 :contents-begin 103 :contents-end 139 :level 2 :priorit= y nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-se= ction-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :ti= tle ... :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/fn= i/Projects/Institutions/Forem/Pfi/PFI/SlideWare/Facteurs-reussite/ecm.txt" = :title ("ECM") :beamer-theme "default" :headline-levels 2 :latex-class "bea= mer" :latex-hyperref-p t :date ((latex-fragment (:value "\\today" :begin 1 = :end 7 :post-blank 0 :parent #1))) :author ("Fabrice Niessen") :creator "Em= acs 24.3.50.1 (Org mode 8.2.1)" :email "fni-djc/iPCCuDYQheJpep6IedvLeJWuRmrY@public.gmane.org" :exclude= -tags ("noexport") :language "en" :preserve-breaks nil :section-numbers t := select-tags ("export") :time-stamp-file t :with-archived-trees headline :wi= th-author t :with-clocks nil :with-creator comment :with-date t :with-drawe= rs (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 :prior= ity 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)) (key= word (:key "BEAMER_THEME" :value "default" :begin 49 :end 73 :post-blank 0 = :post-affiliated 49 :parent #3))) #0 (headline (:raw-value "Donn=C3=A9es" := begin 140 :end 189 :pre-blank 1 :contents-begin 151 :contents-end 189 :leve= l 1 :priority nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0 = :footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGO= RY "ecm" :title (#("Donn=C3=A9es" 0 7 (:parent #3))) :parent #2) (headline = (:raw-value "Donn=C3=A9es" :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 :comment= edp nil :quotedp nil :CATEGORY nil :title (#("Donn=C3=A9es" 0 7 ...)) :pare= nt #3) (section (:begin 163 :end 189 :contents-begin 163 :contents-end 189 = :post-blank 0 :parent #4) (paragraph (:begin 163 :end 189 :contents-begin 1= 63 :contents-end 189 :post-blank 0 :post-affiliated 163 :parent #5) #("Nomb= re de " 0 10 ...) (bold ... #("variables" 0 9 ...)) #("...\n" 0 4 ...))))))= ) (headline (:raw-value "Objectifs" :begin 89 :end 140 :pre-blank 1 :conten= ts-begin 103 :contents-end 139 :level 2 :priority nil :tags nil :todo-keywo= rd nil :todo-type nil :post-blank 0 :footnote-section-p nil :archivedp nil = :commentedp nil :quotedp nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:pa= rent #1))) :parent #0) (section (:begin 103 :end 140 :contents-begin 103 :c= ontents-end 139 :post-blank 1 :parent #1) (paragraph (:begin 103 :end 139 := contents-begin 103 :contents-end 139 :post-blank 0 :post-affiliated 103 :pa= rent #2) #("Rechercher les " 0 15 (:parent #3)) (bold (:begin 118 :end 131 = :contents-begin 119 :contents-end 129 :post-blank 1 :parent #3) #("composan= ts" 0 10 (:parent #4))) #("qui ...\n" 0 8 (:parent #3)))))) #("\\begin{fram= e}[label=3Dsec-1-1]{Objectifs}\nRechercher les \\alert{composants} qui \\ld= ots{}\n\\end{frame}\n" 29 38 (:parent (headline (:raw-value "Objectifs" :be= gin 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 :fo= otnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY = "ecm" :title (#("Objectifs" 0 9 (:parent #2))) :parent (headline (:raw-valu= e "Description" :begin 74 :end 140 :pre-blank 1 :contents-begin 89 :content= s-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 :quot= edp nil :CATEGORY "ecm" :title (#("Description" 0 11 ...)) :parent (org-dat= a nil (section ... ... ... ...) #4 (headline ... ...))) #2)) (section (:beg= in 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 (:p= arent #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 :cont= ents-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-b= lank 1 :contents-begin 103 :contents-end 139 :level 2 :priority nil :tags n= il :todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil := archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title ... :pare= nt ...) #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 :po= st-blank 1 :parent (paragraph (:begin 103 :end 139 :contents-begin 103 :con= tents-end 139 :post-blank 0 :post-affiliated 103 :parent (section (:begin 1= 03 :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 (:beg= in 103 :end 139 :contents-begin 103 :contents-end 139 :post-blank 0 :post-a= ffiliated 103 :parent (section (:begin 103 :end 140 :contents-begin 103 :co= ntents-end 139 :post-blank 1 :parent (headline (:raw-value "Objectifs" :beg= in 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 :foo= tnote-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-b= lank 1 :parent #2) #("composants" 0 10 (:parent #3))) #("qui ...\n" 0 8 (:p= arent #2))))) (:export-options nil :input-buffer "ecm.txt" :input-file "d:/= Users/fni/Projects/Institutions/Forem/Pfi/PFI/SlideWare/Facteurs-reussite/e= cm.txt" :title ("ECM") :beamer-theme "default" :headline-levels 2 :latex-cl= ass "beamer" :latex-hyperref-p t :date ((latex-fragment (:value "\\today" := begin 1 :end 7 :post-blank 0 :parent #1))) :author ("Fabrice Niessen") :cre= ator "Emacs 24.3.50.1 (Org mode 8.2.1)" :email "fni-djc/iPCCuDYQheJpep6IedvLeJWuRmrY@public.gmane.org" = :exclude-tags ("noexport") :language "en" :preserve-breaks nil :section-num= bers t :select-tags ("export") :time-stamp-file t :with-archived-trees head= line :with-author t :with-clocks nil :with-creator comment :with-date t :wi= th-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 (mapco= ncat (function (lambda (element) (org-export-data element info))) (org-elem= ent-contents (if (or greaterp objectp) data (org-element-normalize-contents= data (if ... ...)))) ""))) (funcall transcoder data (if (not greaterp) con= tents (org-element-normalize-string contents)) info)) (progn (let* ((greaterp (memq type org-element-greater-elements)) (object= p (and (not greaterp) (memq type org-element-recursive-objects))) (contents= (mapconcat (function (lambda (element) (org-export-data element info))) (o= rg-element-contents (if (or greaterp objectp) data (org-element-normalize-c= ontents data ...))) ""))) (funcall transcoder data (if (not greaterp) conte= nts (org-element-normalize-string contents)) info))) (if transcoder (progn (let* ((greaterp (memq type org-element-greater-ele= ments)) (objectp (and (not greaterp) (memq type org-element-recursive-objec= ts))) (contents (mapconcat (function (lambda ... ...)) (org-element-content= s (if ... data ...)) ""))) (funcall transcoder data (if (not greaterp) cont= ents (org-element-normalize-string contents)) info)))) (let ((transcoder (org-export-transcoder data info))) (if transcoder (pro= gn (let* ((greaterp (memq type org-element-greater-elements)) (objectp (and= (not greaterp) (memq type org-element-recursive-objects))) (contents (mapc= oncat (function ...) (org-element-contents ...) ""))) (funcall transcoder d= ata (if (not greaterp) contents (org-element-normalize-string contents)) in= fo))))) (cond ((memq data (plist-get info :ignore-list)) nil) ((eq type (quote pl= ain-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-t= ranscoder data info))) (or (and (functionp transcoder) (funcall transcoder = data nil info)) (and (eq type (quote export-snippet)) "")))) (t (let ((tran= scoder (org-export-transcoder data info))) (if transcoder (progn (let* ((gr= eaterp ...) (objectp ...) (contents ...)) (funcall transcoder data (if ... = contents ...) info))))))) (let* ((type (org-element-type data)) (results (cond ((memq data (plist-g= et info :ignore-list)) nil) ((eq type (quote plain-text)) (org-export-filte= r-apply-functions (plist-get info :filter-plain-text) (let (...) (if transc= oder ... data)) info)) ((not (org-export--interpret-p data info)) (org-expo= rt-data (org-export-expand data (mapconcat ... ... "")) info)) ((not type) = (mapconcat (function (lambda ... ...)) data "")) ((or (not (org-element-con= tents data)) (and (eq type ...) (eq ... ...) (org-element-property :archive= dp data))) (let ((transcoder ...)) (or (and ... ...) (and ... "")))) (t (le= t ((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))) result= s))) (plist-get info :exported-data))) (if (not (eq memo (quote no-memo))) memo (let* ((type (org-element-type d= ata)) (results (cond ((memq data (plist-get info :ignore-list)) nil) ((eq t= ype (quote plain-text)) (org-export-filter-apply-functions (plist-get info = :filter-plain-text) (let ... ...) info)) ((not (org-export--interpret-p dat= a 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 (c= ond ((not results) nil) ((memq type (quote (org-data plain-text nil))) resu= lts) (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-fil= ter-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 :p= re-blank 1 :contents-begin 89 :contents-end 139 :level 1 :priority nil :tag= s nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p ni= l :archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title (#("De= scription" 0 11 (:parent #0))) :parent (org-data nil (section (:begin 1 :en= d 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-affili= ated 49 :parent #3))) #0 (headline (:raw-value "Donn=C3=A9es" :begin 140 :e= nd 189 :pre-blank 1 :contents-begin 151 :contents-end 189 :level 1 :priorit= y nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-se= ction-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :ti= tle (#("Donn=C3=A9es" 0 7 (:parent #3))) :parent #2) (headline (:raw-value = "Donn=C3=A9es" :begin 151 :end 189 :pre-blank 1 :contents-begin 163 :conten= ts-end 189 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type ni= l :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quo= tedp nil :CATEGORY nil :title (#("Donn=C3=A9es" 0 7 ...)) :parent #3) (sect= ion (: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-beg= in 103 :contents-end 139 :post-blank 0 :post-affiliated 103 :parent #2) #("= Rechercher les " 0 15 (:parent #3)) (bold (:begin 118 :end 131 :contents-be= gin 119 :contents-end 129 :post-blank 1 :parent #3) #("composants" 0 10 (:p= arent #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 "def= ault" :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 "fni-djc/iPCCuDYQheJpep6IedvLeJWuRmrY@public.gmane.org" :exclude-tags ("noexport") :language "en"= :preserve-breaks nil :section-numbers t :select-tags ("export") :time-stam= p-file t :with-archived-trees headline :with-author t :with-clocks nil :wit= h-creator comment :with-date t :with-drawers (not "LOGBOOK") :with-email ni= l ...)) (lambda (element) (org-export-data element info))((headline (:raw-value "= Description" :begin 74 :end 140 :pre-blank 1 :contents-begin 89 :contents-e= nd 139 :level 1 :priority nil :tags nil :todo-keyword nil :todo-type nil :p= ost-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp= nil :CATEGORY "ecm" :title (#("Description" 0 11 (:parent #0))) :parent (o= rg-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-affiliate= d 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=C3=A9es" :begin 140 :end 189 :pre-blank 1 :contents-begin 151 := contents-end 189 :level 1 :priority nil :tags nil :todo-keyword nil :todo-t= ype nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp ni= l :quotedp nil :CATEGORY "ecm" :title (#("Donn=C3=A9es" 0 7 (:parent #3))) = :parent #2) (headline (:raw-value "Donn=C3=A9es" :begin 151 :end 189 :pre-b= lank 1 :contents-begin 163 :contents-end 189 :level 2 :priority nil :tags n= il :todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil := archivedp nil :commentedp nil :quotedp nil :CATEGORY nil :title (#("Donn=C3= =A9es" 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 1= 63 :parent #5) #("Nombre de " 0 10 ...) (bold ... #("variables" 0 9 ...)) #= ("...\n" 0 4 ...))))))) (headline (:raw-value "Objectifs" :begin 89 :end 14= 0 :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 :p= ost-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 (:b= egin 1 :end 74 :contents-begin 1 :contents-end 73 :post-blank 1 :parent (or= g-data nil #1 (headline (:raw-value "Description" :begin 74 :end 140 :pre-b= lank 1 :contents-begin 89 :contents-end 139 :level 1 :priority nil :tags ni= l :todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil :a= rchivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title (#("Descri= ption" 0 11 ...)) :parent #3) (headline (:raw-value "Objectifs" :begin 89 := end 140 :pre-blank 1 :contents-begin 103 :contents-end 139 :level 2 :priori= ty nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-s= ection-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :t= itle (#("Objectifs" 0 9 ...)) :parent #4) (section (:begin 103 :end 140 :co= ntents-begin 103 :contents-end 139 :post-blank 1 :parent #5) (paragraph ...= #("Rechercher les " 0 15 ...) ... #("qui ...\n" 0 8 ...))))) (headline (:r= aw-value "Donn=C3=A9es" :begin 140 :end 189 :pre-blank 1 :contents-begin 15= 1 :contents-end 189 :level 1 :priority nil :tags nil :todo-keyword nil :tod= o-type nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp= nil :quotedp nil :CATEGORY "ecm" :title (#("Donn=C3=A9es" 0 7 ...)) :paren= t #3) (headline (:raw-value "Donn=C3=A9es" :begin 151 :end 189 :pre-blank 1= :contents-begin 163 :contents-end 189 :level 2 :priority nil :tags nil :to= do-keyword nil :todo-type nil :post-blank 0 :footnote-section-p nil :archiv= edp nil :commentedp nil :quotedp nil :CATEGORY nil :title (#("Donn=C3=A9es"= 0 7 ...)) :parent #4) (section (:begin 163 :end 189 :contents-begin 163 :c= ontents-end 189 :post-blank 0 :parent #5) (paragraph ... #("Nombre de " 0 1= 0 ...) ... #("...\n" 0 4 ...))))))) (keyword (:key "TITLE" :value "ECM" :be= gin 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 :pos= t-affiliated 18 :parent #1)) (keyword (:key "BEAMER_THEME" :value "default"= :begin 49 :end 73 :post-blank 0 :post-affiliated 49 :parent #1))) (headlin= e (: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 :t= odo-type nil :post-blank 0 :footnote-section-p nil :archivedp nil :commente= dp nil :quotedp nil :CATEGORY "ecm" :title (#("Description" 0 11 (:parent #= 1))) :parent (org-data nil (section (:begin 1 :end 74 :contents-begin 1 :co= ntents-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 "defa= ult" :begin 49 :end 73 :post-blank 0 :post-affiliated 49 :parent #4))) #1 (= headline (:raw-value "Donn=C3=A9es" :begin 140 :end 189 :pre-blank 1 :conte= nts-begin 151 :contents-end 189 :level 1 :priority nil :tags nil :todo-keyw= ord nil :todo-type nil :post-blank 0 :footnote-section-p nil :archivedp nil= :commentedp nil :quotedp nil :CATEGORY "ecm" :title (#("Donn=C3=A9es" 0 7 = ...)) :parent #3) (headline (:raw-value "Donn=C3=A9es" :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 (#("D= onn=C3=A9es" 0 7 ...)) :parent #4) (section (:begin 163 :end 189 :contents-= begin 163 :contents-end 189 :post-blank 0 :parent #5) (paragraph ... #("Nom= bre de " 0 10 ...) ... #("...\n" 0 4 ...))))))) (headline (:raw-value "Obje= ctifs" :begin 89 :end 140 :pre-blank 1 :contents-begin 103 :contents-end 13= 9 :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil :post-b= lank 0 :footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil = :CATEGORY "ecm" :title (#("Objectifs" 0 9 (:parent #2))) :parent #1) (secti= on (: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))) #("qu= i ...\n" 0 8 (:parent #4)))))) (headline (:raw-value "Donn=C3=A9es" :begin = 140 :end 189 :pre-blank 1 :contents-begin 151 :contents-end 189 :level 1 :p= riority nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0 :footn= ote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "ec= m" :title (#("Donn=C3=A9es" 0 7 (:parent #1))) :parent (org-data nil (secti= on (:begin 1 :end 74 :contents-begin 1 :contents-end 73 :post-blank 1 :pare= nt #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-blan= k 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 :f= ootnote-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 :quoted= p nil :CATEGORY "ecm" :title (#("Objectifs" 0 9 ...)) :parent #4) (section = (:begin 103 :end 140 :contents-begin 103 :contents-end 139 :post-blank 1 :p= arent #5) (paragraph ... #("Rechercher les " 0 15 ...) ... #("qui ...\n" 0 = 8 ...))))) #1)) (headline (:raw-value "Donn=C3=A9es" :begin 151 :end 189 :p= re-blank 1 :contents-begin 163 :contents-end 189 :level 2 :priority nil :ta= gs nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-section-p n= il :archivedp nil :commentedp nil :quotedp nil :CATEGORY nil :title (#("Don= n=C3=A9es" 0 7 (:parent #2))) :parent #1) (section (:begin 163 :end 189 :co= ntents-begin 163 :contents-end 189 :post-blank 0 :parent #2) (paragraph (:b= egin 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 (mapco= ncat (function (lambda (element) (org-export-data element info))) (org-elem= ent-contents (if (or greaterp objectp) data (org-element-normalize-contents= data (if ... ...)))) ""))) (funcall transcoder data (if (not greaterp) con= tents (org-element-normalize-string contents)) info)) (progn (let* ((greaterp (memq type org-element-greater-elements)) (object= p (and (not greaterp) (memq type org-element-recursive-objects))) (contents= (mapconcat (function (lambda (element) (org-export-data element info))) (o= rg-element-contents (if (or greaterp objectp) data (org-element-normalize-c= ontents data ...))) ""))) (funcall transcoder data (if (not greaterp) conte= nts (org-element-normalize-string contents)) info))) (if transcoder (progn (let* ((greaterp (memq type org-element-greater-ele= ments)) (objectp (and (not greaterp) (memq type org-element-recursive-objec= ts))) (contents (mapconcat (function (lambda ... ...)) (org-element-content= s (if ... data ...)) ""))) (funcall transcoder data (if (not greaterp) cont= ents (org-element-normalize-string contents)) info)))) (let ((transcoder (org-export-transcoder data info))) (if transcoder (pro= gn (let* ((greaterp (memq type org-element-greater-elements)) (objectp (and= (not greaterp) (memq type org-element-recursive-objects))) (contents (mapc= oncat (function ...) (org-element-contents ...) ""))) (funcall transcoder d= ata (if (not greaterp) contents (org-element-normalize-string contents)) in= fo))))) (cond ((memq data (plist-get info :ignore-list)) nil) ((eq type (quote pl= ain-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-t= ranscoder data info))) (or (and (functionp transcoder) (funcall transcoder = data nil info)) (and (eq type (quote export-snippet)) "")))) (t (let ((tran= scoder (org-export-transcoder data info))) (if transcoder (progn (let* ((gr= eaterp ...) (objectp ...) (contents ...)) (funcall transcoder data (if ... = contents ...) info))))))) (let* ((type (org-element-type data)) (results (cond ((memq data (plist-g= et info :ignore-list)) nil) ((eq type (quote plain-text)) (org-export-filte= r-apply-functions (plist-get info :filter-plain-text) (let (...) (if transc= oder ... data)) info)) ((not (org-export--interpret-p data info)) (org-expo= rt-data (org-export-expand data (mapconcat ... ... "")) info)) ((not type) = (mapconcat (function (lambda ... ...)) data "")) ((or (not (org-element-con= tents data)) (and (eq type ...) (eq ... ...) (org-element-property :archive= dp data))) (let ((transcoder ...)) (or (and ... ...) (and ... "")))) (t (le= t ((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))) result= s))) (plist-get info :exported-data))) (if (not (eq memo (quote no-memo))) memo (let* ((type (org-element-type d= ata)) (results (cond ((memq data (plist-get info :ignore-list)) nil) ((eq t= ype (quote plain-text)) (org-export-filter-apply-functions (plist-get info = :filter-plain-text) (let ... ...) info)) ((not (org-export--interpret-p dat= a 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 (c= ond ((not results) nil) ((memq type (quote (org-data plain-text nil))) resu= lts) (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-fil= ter-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)) (keywo= rd (:key "OPTIONS" :value "H:2 texht:t toc:nil" :begin 18 :end 49 :post-bla= nk 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 :conte= nts-begin 89 :contents-end 139 :level 1 :priority nil :tags nil :todo-keywo= rd 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 n= il :tags nil :todo-keyword nil :todo-type nil :post-blank 0 :footnote-secti= on-p nil :archivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title= (#("Objectifs" 0 9 (:parent #2))) :parent #1) (section (:begin 103 :end 14= 0 :contents-begin 103 :contents-end 139 :post-blank 1 :parent #2) (paragrap= h (:begin 103 :end 139 :contents-begin 103 :contents-end 139 :post-blank 0 = :post-affiliated 103 :parent #3) #("Rechercher les " 0 15 (:parent #4)) (bo= ld (: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=C3=A9es" :begin 140 :end 189 :pre-blan= k 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 :arc= hivedp nil :commentedp nil :quotedp nil :CATEGORY "ecm" :title (#("Donn=C3= =A9es" 0 7 (:parent #1))) :parent #0) (headline (:raw-value "Donn=C3=A9es" = :begin 151 :end 189 :pre-blank 1 :contents-begin 163 :contents-end 189 :lev= el 2 :priority nil :tags nil :todo-keyword nil :todo-type nil :post-blank 0= :footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :CATEG= ORY nil :title (#("Donn=C3=A9es" 0 7 (:parent #2))) :parent #1) (section (:= begin 163 :end 189 :contents-begin 163 :contents-end 189 :post-blank 0 :par= ent #2) (paragraph (:begin 163 :end 189 :contents-begin 163 :contents-end 1= 89 :post-blank 0 :post-affiliated 163 :parent #3) #("Nombre de " 0 10 (:par= ent #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 (:p= arent #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") :c= reator "Emacs 24.3.50.1 (Org mode 8.2.1)" :email "fni-djc/iPCCuDYQheJpep6IedvLeJWuRmrY@public.gmane.org= " :exclude-tags ("noexport") :language "en" :preserve-breaks nil :section-n= umbers t :select-tags ("export") :time-stamp-file t :with-archived-trees he= adline :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 (f= uncall inner-template body info))) (template (cdr (assq (quote template) (p= list-get info :translate-alist))))) (org-no-properties (org-export-filter-a= pply-functions (plist-get info :filter-final-output) (if (or (not (function= p template)) body-only) full-body (funcall template full-body info)) info))) (progn (run-hook-with-args (quote org-export-before-processing-hook) (pro= gn (or (and (vectorp backend) (>=3D (length backend) 8) (memq (aref backend= 0) cl-struct-org-export-backend-tags)) (error "%s accessing a non-%s" (quo= te 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-h= ook-with-args (quote org-export-before-parsing-hook) (progn (or (and (vecto= rp backend) (>=3D (length backend) 8) (memq (aref backend 0) cl-struct-org-= export-backend-tags)) (error "%s accessing a non-%s" (quote org-export-back= end-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-e= lement-interpret-data (plist-get info :date))) (cons "email" (or (plist-get= info :email) "")) (cons "title" (org-element-interpret-data (plist-get inf= o :title))))) (let ((backend-name (progn (or (and (vectorp backend) (>=3D .= .. 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)) (se= tq info (org-combine-plists info (org-export-collect-tree-properties tree i= nfo))) (let* ((body (org-element-normalize-string (or (org-export-data tree= info) ""))) (inner-template (cdr (assq (quote inner-template) (plist-get i= nfo :translate-alist)))) (full-body (if (not (functionp inner-template)) bo= dy (funcall inner-template body info))) (template (cdr (assq (quote templat= e) (plist-get info :translate-alist))))) (org-no-properties (org-export-fil= ter-apply-functions (plist-get info :filter-final-output) (if (or (not (fun= ctionp template)) body-only) full-body (funcall template full-body info)) i= nfo)))) (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (pro= gn (run-hook-with-args (quote org-export-before-processing-hook) (progn (or= (and (vectorp backend) (>=3D (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-updat= e-radio-target-regexp) (goto-char (point-min)) (save-excursion (run-hook-wi= th-args (quote org-export-before-parsing-hook) (progn (or (and (vectorp bac= kend) (>=3D ... 8) (memq ... cl-struct-org-export-backend-tags)) (error "%s= accessing a non-%s" (quote org-export-backend-name) (quote org-export-back= end))) (aref backend 1)))) (setq info (org-export-install-filters (org-comb= ine-plists info (org-export-get-environment backend subtreep ext-plist)))) = (org-macro-replace-all (list (cons "author" (org-element-interpret-data (pl= ist-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-nam= e (progn (or (and ... ... ...) (error "%s accessing a non-%s" ... ...)) (ar= ef backend 1)))) (progn (let ((--dolist-tail-- (plist-get info :filter-opti= ons)) filter) (while --dolist-tail-- (setq filter (car --dolist-tail--)) (l= et (...) (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-c= ombine-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 in= ner-template body info))) (template (cdr (assq (quote template) (plist-get = info :translate-alist))))) (org-no-properties (org-export-filter-apply-func= tions (plist-get info :filter-final-output) (if (or (not ...) body-only) fu= ll-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) (>=3D ... 8) (memq ... cl-struct-or= g-export-backend-tags)) (error "%s accessing a non-%s" (quote org-export-ba= ckend-name) (quote org-export-backend))) (aref backend 1))) (org-export-exp= and-include-keyword) (org-macro-initialize-templates) (org-macro-replace-al= l org-macro-templates) (org-export-execute-babel-code) (org-update-radio-ta= rget-regexp) (goto-char (point-min)) (save-excursion (run-hook-with-args (q= uote 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 backen= d subtreep ext-plist)))) (org-macro-replace-all (list (cons "author" (org-e= lement-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 :titl= e))))) (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-buf= fer nil visible-only) info)) (setq info (org-combine-plists info (org-expor= t-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 i= nfo :filter-final-output) (if (or ... body-only) full-body (funcall templat= e full-body info)) info))))) (and (buffer-live-p --buf-copy) (progn (save-c= urrent-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (kil= l-buffer --buf-copy)))) (let ((--buf-copy (org-export-copy-buffer))) (unwind-protect (save-curren= t-buffer (set-buffer --buf-copy) (goto-char (point-min)) (progn (run-hook-w= ith-args (quote org-export-before-processing-hook) (progn (or (and ... ... = ...) (error "%s accessing a non-%s" ... ...)) (aref backend 1))) (org-expor= t-expand-include-keyword) (org-macro-initialize-templates) (org-macro-repla= ce-all org-macro-templates) (org-export-execute-babel-code) (org-update-rad= io-target-regexp) (goto-char (point-min)) (save-excursion (run-hook-with-ar= gs (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-a= ll (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 ... ...))) (prog= n (let (... filter) (while --dolist-tail-- ... ... ...)))) (setq tree (org-= export-filter-apply-functions (plist-get info :filter-parse-tree) (org-elem= ent-parse-buffer nil visible-only) info)) (setq info (org-combine-plists in= fo (org-export-collect-tree-properties tree info))) (let* ((body (org-eleme= nt-normalize-string ...)) (inner-template (cdr ...)) (full-body (if ... bod= y ...)) (template (cdr ...))) (org-no-properties (org-export-filter-apply-f= unctions (plist-get info :filter-final-output) (if ... full-body ...) info)= )))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffe= r --buf-copy) (restore-buffer-modified-p nil)) (kill-buffer --buf-copy))))) (let* ((org-export-current-backend (progn (or (and (vectorp backend) (>= =3D (length backend) 8) (memq (aref backend 0) cl-struct-org-export-backend= -tags)) (error "%s accessing a non-%s" (quote org-export-backend-name) (quo= te 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 (r= un-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-par= se-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-p= roperties (org-export-filter-apply-functions ... ... info))))) (and (buffer= -live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy) (re= store-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 (poi= nt-min)) (forward-line) (narrow-to-region (point) (point-max)))) (let* ((or= g-export-current-backend (progn (or (and (vectorp backend) (>=3D ... 8) (me= mq ... 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 --bu= f-copy) (goto-char (point-min)) (progn (run-hook-with-args (quote org-expor= t-before-processing-hook) (progn ... ...)) (org-export-expand-include-keywo= rd) (org-macro-initialize-templates) (org-macro-replace-all org-macro-templ= ates) (org-export-execute-babel-code) (org-update-radio-target-regexp) (got= o-char (point-min)) (save-excursion (run-hook-with-args ... ...)) (setq inf= o (org-export-install-filters ...)) (org-macro-replace-all (list ... ... ..= . ...)) (let (...) (progn ...)) (setq tree (org-export-filter-apply-functio= ns ... ... 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-ma= x)))) (let* ((org-export-current-backend (progn (or (and ... ... ...) (erro= r "%s accessing a non-%s" ... ...)) (aref backend 1))) (info (org-combine-p= lists (list :export-options (delq nil ...)) (org-export--get-buffer-attribu= tes))) 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-exp= ort-execute-babel-code) (org-update-radio-target-regexp) (goto-char ...) (s= ave-excursion ...) (setq info ...) (org-macro-replace-all ...) (let ... ...= ) (setq tree ...) (setq info ...) (let* ... ...))) (and (buffer-live-p --bu= f-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) (le= t ((coding-system-for-write encoding)) (write-file file))) (and (buffer-nam= e 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 proc= ess") (current-message)) (unwind-protect (progn (if with-temp-message (prog= n (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) n= il --process) (let (...) (set-process-sentinel --process ...))))) (and with= -temp-message (if current-message (message "%s" current-message) (message n= il))))) (let ((output (org-export-as backend subtreep visible-only body-onl= y ext-plist))) (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-c= urrent-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert outpu= t) (let (...) (write-file file))) (and (buffer-name temp-buffer) (kill-buff= er 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-proce= ss) (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 proce= ss") (current-message)) (unwind-protect (progn (if with-temp-message (progn= (setq current-message ...) (message "%s" with-temp-message))) (let ((--cop= y-fun ...) (--temp-file ...) (--coding buffer-file-coding-system)) (let (..= . ...) (unwind-protect ... ...)) (let* (... ... ...) (org-export-add-to-sta= ck ... nil --process) (let ... ...)))) (and with-temp-message (if current-m= essage (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 t= emp-buffer) (unwind-protect (progn (insert output) (let ... ...)) (and (buf= fer-name temp-buffer) (kill-buffer temp-buffer))))) (if (and (org-export--c= opy-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 as= ync (let ((with-temp-message "Initializing asynchronous export process") (c= urrent-message)) (unwind-protect (progn (if with-temp-message (progn ... ..= .)) (let (... ... ...) (let ... ...) (let* ... ... ...))) (and with-temp-me= ssage (if current-message (message "%s" current-message) (message nil))))) = (let ((output (org-export-as backend subtreep visible-only body-only ext-pl= ist))) (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-b= uffer (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 po= st-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-t= o-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-expor= t-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-o= pen-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-d= ispatch-last-position) (move-marker org-export-dispatch-last-position nil))= )) (funcall action (and (memq (quote async) optns) t) (and (memq (quote sub= tree) 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 (q= uote publish-current-file)) (org-publish-current-file (memq (quote force) o= ptns) (memq (quote async) optns))) ((eql action (quote publish-current-proj= ect)) (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 n= il t) org-publish-project-alist) (memq (quote force) optns) (memq (quote as= ync) optns))) ((eql action (quote publish-all)) (org-publish-all (memq (quo= te force) optns) (memq (quote async) optns))) (t (save-excursion (if arg (p= rogn (if (eq (marker-buffer org-export-dispatch-last-position) (org-base-bu= ffer ...)) (goto-char org-export-dispatch-last-position) (move-marker org-e= xport-dispatch-last-position nil)))) (funcall action (and (memq (quote asyn= c) 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)) (op= tns (cdr input))) (if (memq (quote subtree) optns) nil (move-marker org-exp= ort-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-cur= rent-file (memq (quote force) optns) (memq (quote async) optns))) ((eql act= ion (quote publish-current-project)) (org-publish-current-project (memq (qu= ote 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 (quot= e force) optns) (memq (quote async) optns))) ((eql action (quote publish-al= l)) (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 su= btree) optns) t) (and (memq (quote visible) optns) t) (and (memq (quote bod= y) 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/Reposi= tories/org-mode/lisp/) Best regards, Seb --=20 Sebastien Vauban