[O] Bug: Regression with HTML exports on master branch [N/A (N/A @ /home/bernt/git/org-mode/lisp/org-install.el)]

[Bernt Hansen]

Hi Bastien,

Since org-version doesn't exist anymore I can't export to HTML from the
master branch.

I get the following error

I'll switch to maint until a fix is available.

Regards,
Bernt


Debugger entered--Lisp error: (void-variable org-version)
  (concat "Org version " org-version " with Emacs version " (number-to-string 
emacs-major-version))
  (let ((html-post ...) (email ...) (creator-info ...)) (when (plist-get 
opt-plist :html-postamble) (insert "\n<div id=\"" ... "\">\n") (cond ... ... 
... ...) (insert "\n</div>")))
  (if body-only nil (insert "</div>\n") (let (... ... ...) (when ... ... ... 
...)))
  (unless body-only (insert "</div>\n") (let (... ... ...) (when ... ... ... 
...)))
  (let ((case-fold-search nil) (org-odd-levels-only odd)) (mapc (lambda ... 
...) org-export-plist-vars) (setq umax (if arg ... org-export-headline-levels)) 
(setq umax-toc (if ... ... umax)) (unless body-only (insert ...) (when ... ...) 
(insert ... "\n<h1 class=\"title\">" title "</h1>\n")) (if org-export-with-toc 
(progn ... ... ... ... ... ... ...)) (setq head-count 0) 
(org-init-section-numbers) (org-open-par) (while (setq line ... origline line) 
(catch ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... 
... ... ...)) (when inquote (insert "</pre>\n") (org-open-par)) 
(org-html-level-start 1 nil umax (and org-export-with-toc ...) head-count 
opt-plist) (when (and ... first-heading-pos) (insert "</div>\n")) 
(save-excursion (goto-char ...) (while ... ... ... ...)) (when footnotes 
(insert ... "\n")) (let (...) (when bib ...)) (unless body-only (insert 
"</div>\n") (let ... ...)) (if org-export-html-with-timestamp (insert 
org-export-html-html-helper-timestamp)) (unless body-only (insert 
"\n</body>\n</html>\n")) (unless (plist-get opt-plist :buffer-will-be-killed) 
(normal-mode) (if ... ...)) (goto-char (point-min)) (when thetoc (if ... ... 
... ...) (insert "<div id=\"table-of-contents\">\n") (let ... ... ... ...)) 
(goto-char (point-min)) (while (re-search-forward "<p>[ 
\n      ]*</p>" nil t) (replace-match "")) (goto-char (point-min)) (goto-char 
(point-min)) (let (beg end n) (while ... ... ... ... ...)) (goto-char 
(point-min)) (when (looking-at "\\s-+\n") (replace-match "")) 
(remove-text-properties (point-min) (point-max) (quote ...)) (run-hooks (quote 
org-export-html-final-hook)) (or to-buffer (save-buffer)) (goto-char 
(point-min)) (or (org-export-push-to-kill-ring "HTML") (message "Exporting... 
done")) (if (eq to-buffer ...) (prog1 ... ...) (current-buffer)))
  (let* ((opt-plist ...) (body-only ...) (style ...) (html-extension ...) valid 
thetoc have-headings first-heading-pos (odd org-odd-levels-only) (region-p ...) 
(rbeg ...) (rend ...) (subtree-p ...) (level-offset ...) (opt-plist ...) 
(org-current-export-dir ...) (org-current-export-file buffer-file-name) (level 
0) (line "") (origline "") txt todo (umax nil) (umax-toc nil) (filename ...) 
(current-dir ...) (auto-insert nil) (buffer ...) (org-levels-open ...) (date 
...) (author ...) (html-validation-link ...) (title ...) (link-up ...) 
(link-home ...) (dummy ...) (html-table-tag ...) (quote-re0 ...) (quote-re ...) 
(inquote nil) (infixed nil) (inverse nil) (email ...) (language ...) (keywords 
...) (description ...) (num ...) (lang-words nil) (head-count 0) cnt ...) (let 
(...) (org-unmodified ...)) (message "Exporting...") (setq org-min-level 
(org-get-min-level lines level-offset)) (setq org-last-level org-min-level) 
(org-init-section-numbers) (cond (... ...) (date) (t ...)) (setq lang-words (or 
... ...)) (set-buffer buffer) (let (...) (erase-buffer)) (fundamental-mode) 
(org-install-letbind) (and (fboundp ...) (set-buffer-file-coding-system 
coding-system-for-write)) (let (... ...) (mapc ... org-export-plist-vars) (setq 
umax ...) (setq umax-toc ...) (unless body-only ... ... ...) (if 
org-export-with-toc ...) (setq head-count 0) (org-init-section-numbers) 
(org-open-par) (while ... ...) (when inquote ... ...) (org-html-level-start 1 
nil umax ... head-count opt-plist) (when ... ...) (save-excursion ... ...) 
(when footnotes ...) (let ... ...) (unless body-only ... ...) (if 
org-export-html-with-timestamp ...) (unless body-only ...) (unless ... ... ...) 
(goto-char ...) (when thetoc ... ... ...) (goto-char ...) (while ... ...) 
(goto-char ...) (goto-char ...) (let ... ...) (goto-char ...) (when ... ...) 
(remove-text-properties ... ... ...) (run-hooks ...) (or to-buffer ...) 
(goto-char ...) (or ... ...) (if ... ... ...)))
  org-export-as-html(nil hidden)
  org-export-as-html-and-open(nil)
  call-interactively(org-export-as-html-and-open)
  (if (and bg (nth 2 ass) (not ...) (not ...)) (let (...) (set-process-sentinel 
p ...) (message "Background process \"%s\": started" p)) (if subtree-p (progn 
... ...)) (call-interactively (nth 1 ass)) (when (and bpos ...) (let ... ... 
... ... ...)))
  (let* ((bg ...) (subtree-p ...) (help "[t]   insert the export option 
template\n[v]   limit export to visible part of outline tree\n[1]   switch 
buffer/subtree export\n[SPC] publish enclosing subtree (with LaTeX_CLASS or 
EXPORT_FILE_NAME prop)\n\n[a/n/u] export as ASCII/Latin-1/UTF-8         [A/N/U] 
to temporary buffer\n\n[h] export as HTML      [H] to temporary buffer   [R] 
export region\n[b] export as HTML and open in browser\n\n[l] export as LaTeX    
 [L] to temporary buffer\n[p] export as LaTeX and process to PDF            [d] 
... and open PDF file\n\n[D] export as DocBook   [V] export as DocBook, process 
to PDF, and open\n\n[o] export as OpenDocument Text                   [O] ... 
and open\n\n[j] export as TaskJuggler                         [J] ... and 
open\n\n[m] export as Freemind mind map\n[x] export as XOXO\n[g] export using 
Wes Hardaker's generic exporter\n\n[i] export current file as iCalendar 
file\n[I] export all agenda files as iCalendar files   [c] ...as one combined 
file\n\n[F] publish current file          [P] publish current project\n[X] 
publish a project...          [E] publish every projects") (cmds ...) r1 r2 ass 
(cpos ...) (cbuf ...) bpos) (save-excursion (save-window-excursion ... ... ... 
... ... ...)) (if (fboundp ...) (redisplay)) (and bpos (goto-char bpos)) (setq 
r2 (if ... ... r1)) (unless (setq ass ...) (error "No command associated with 
key %c" r1)) (if (and bg ... ... ...) (let ... ... ...) (if subtree-p ...) 
(call-interactively ...) (when ... ...)))
  org-export(nil)
  call-interactively(org-export nil nil)


Emacs  : GNU Emacs 23.2.1 (i486-pc-linux-gnu, GTK+ Version 2.20.0)
 of 2010-12-11 on raven, modified by Debian
Package: Org-mode version N/A (N/A @ 
/home/bernt/git/org-mode/lisp/org-install.el)