Debugger entered--Lisp error: (quit)
  calculate-lisp-indent()
  lisp-indent-line()
  indent-according-to-mode()
  newline-and-indent()
  (if indent-p (newline-and-indent))
  (if linebreak (progn (goto-char linebreak) (newline-and-indent) (setq linebreak nil)) (goto-char here) (setq indent-p (reporter-beautify-list maxwidth compact-p)) (goto-char here) (forward-sexp 1) (if indent-p (newline-and-indent)) t)
  (if (<= maxwidth (current-column)) (if linebreak (progn ... ... ...) (goto-char here) (setq indent-p ...) (goto-char here) (forward-sexp 1) (if indent-p ...) t) (if compact-p (setq linebreak ...) (newline-and-indent)))
  (while move (setq here (point)) (setq move (scan-sexps ... 1)) (goto-char move) (if (<= maxwidth ...) (if linebreak ... ... ... ... ... ... t) (if compact-p ... ...)))
  (progn (down-list 1) (setq indent-enclosing-p t) (while move (setq here ...) (setq move ...) (goto-char move) (if ... ... ...)) t)
  (condition-case nil (progn (down-list 1) (setq indent-enclosing-p t) (while move ... ... ... ...) t) (error indent-enclosing-p))
  (let ((move t) linebreak indent-enclosing-p indent-p here) (condition-case nil (progn ... ... ... t) (error indent-enclosing-p)))
  reporter-beautify-list(77 t)
  (setq indent-p (reporter-beautify-list maxwidth compact-p))
  (if linebreak (progn (goto-char linebreak) (newline-and-indent) (setq linebreak nil)) (goto-char here) (setq indent-p (reporter-beautify-list maxwidth compact-p)) (goto-char here) (forward-sexp 1) (if indent-p (newline-and-indent)) t)
  (if (<= maxwidth (current-column)) (if linebreak (progn ... ... ...) (goto-char here) (setq indent-p ...) (goto-char here) (forward-sexp 1) (if indent-p ...) t) (if compact-p (setq linebreak ...) (newline-and-indent)))
  (while move (setq here (point)) (setq move (scan-sexps ... 1)) (goto-char move) (if (<= maxwidth ...) (if linebreak ... ... ... ... ... ... t) (if compact-p ... ...)))
  (progn (down-list 1) (setq indent-enclosing-p t) (while move (setq here ...) (setq move ...) (goto-char move) (if ... ... ...)) t)
  (condition-case nil (progn (down-list 1) (setq indent-enclosing-p t) (while move ... ... ... ...) t) (error indent-enclosing-p))
  (let ((move t) linebreak indent-enclosing-p indent-p here) (condition-case nil (progn ... ... ... t) (error indent-enclosing-p)))
  reporter-beautify-list(77 t)
  (setq indent-p (reporter-beautify-list maxwidth compact-p))
  (if linebreak (progn (goto-char linebreak) (newline-and-indent) (setq linebreak nil)) (goto-char here) (setq indent-p (reporter-beautify-list maxwidth compact-p)) (goto-char here) (forward-sexp 1) (if indent-p (newline-and-indent)) t)
  (if (<= maxwidth (current-column)) (if linebreak (progn ... ... ...) (goto-char here) (setq indent-p ...) (goto-char here) (forward-sexp 1) (if indent-p ...) t) (if compact-p (setq linebreak ...) (newline-and-indent)))
  (while move (setq here (point)) (setq move (scan-sexps ... 1)) (goto-char move) (if (<= maxwidth ...) (if linebreak ... ... ... ... ... ... t) (if compact-p ... ...)))
  (progn (down-list 1) (setq indent-enclosing-p t) (while move (setq here ...) (setq move ...) (goto-char move) (if ... ... ...)) t)
  (condition-case nil (progn (down-list 1) (setq indent-enclosing-p t) (while move ... ... ... ...) t) (error indent-enclosing-p))
  (let ((move t) linebreak indent-enclosing-p indent-p here) (condition-case nil (progn ... ... ... t) (error indent-enclosing-p)))
  reporter-beautify-list(77 t)
  (setq indent-p (reporter-beautify-list maxwidth compact-p))
  (if linebreak (progn (goto-char linebreak) (newline-and-indent) (setq linebreak nil)) (goto-char here) (setq indent-p (reporter-beautify-list maxwidth compact-p)) (goto-char here) (forward-sexp 1) (if indent-p (newline-and-indent)) t)
  (if (<= maxwidth (current-column)) (if linebreak (progn ... ... ...) (goto-char here) (setq indent-p ...) (goto-char here) (forward-sexp 1) (if indent-p ...) t) (if compact-p (setq linebreak ...) (newline-and-indent)))
  (while move (setq here (point)) (setq move (scan-sexps ... 1)) (goto-char move) (if (<= maxwidth ...) (if linebreak ... ... ... ... ... ... t) (if compact-p ... ...)))
  (progn (down-list 1) (setq indent-enclosing-p t) (while move (setq here ...) (setq move ...) (goto-char move) (if ... ... ...)) t)
  (condition-case nil (progn (down-list 1) (setq indent-enclosing-p t) (while move ... ... ... ...) t) (error indent-enclosing-p))
  (let ((move t) linebreak indent-enclosing-p indent-p here) (condition-case nil (progn ... ... ... t) (error indent-enclosing-p)))
  reporter-beautify-list(77 t)
  (setq indent-p (reporter-beautify-list maxwidth compact-p))
  (if linebreak (progn (goto-char linebreak) (newline-and-indent) (setq linebreak nil)) (goto-char here) (setq indent-p (reporter-beautify-list maxwidth compact-p)) (goto-char here) (forward-sexp 1) (if indent-p (newline-and-indent)) t)
  (if (<= maxwidth (current-column)) (if linebreak (progn ... ... ...) (goto-char here) (setq indent-p ...) (goto-char here) (forward-sexp 1) (if indent-p ...) t) (if compact-p (setq linebreak ...) (newline-and-indent)))
  (while move (setq here (point)) (setq move (scan-sexps ... 1)) (goto-char move) (if (<= maxwidth ...) (if linebreak ... ... ... ... ... ... t) (if compact-p ... ...)))
  (progn (down-list 1) (setq indent-enclosing-p t) (while move (setq here ...) (setq move ...) (goto-char move) (if ... ... ...)) t)
  (condition-case nil (progn (down-list 1) (setq indent-enclosing-p t) (while move ... ... ... ...) t) (error indent-enclosing-p))
  (let ((move t) linebreak indent-enclosing-p indent-p here) (condition-case nil (progn ... ... ... t) (error indent-enclosing-p)))
  reporter-beautify-list(77 t)
  (setq indent-p (reporter-beautify-list maxwidth compact-p))
  (if linebreak (progn (goto-char linebreak) (newline-and-indent) (setq linebreak nil)) (goto-char here) (setq indent-p (reporter-beautify-list maxwidth compact-p)) (goto-char here) (forward-sexp 1) (if indent-p (newline-and-indent)) t)
  (if (<= maxwidth (current-column)) (if linebreak (progn ... ... ...) (goto-char here) (setq indent-p ...) (goto-char here) (forward-sexp 1) (if indent-p ...) t) (if compact-p (setq linebreak ...) (newline-and-indent)))
  (while move (setq here (point)) (setq move (scan-sexps ... 1)) (goto-char move) (if (<= maxwidth ...) (if linebreak ... ... ... ... ... ... t) (if compact-p ... ...)))
  (progn (down-list 1) (setq indent-enclosing-p t) (while move (setq here ...) (setq move ...) (goto-char move) (if ... ... ...)) t)
  (condition-case nil (progn (down-list 1) (setq indent-enclosing-p t) (while move ... ... ... ...) t) (error indent-enclosing-p))
  (let ((move t) linebreak indent-enclosing-p indent-p here) (condition-case nil (progn ... ... ... t) (error indent-enclosing-p)))
  reporter-beautify-list(77 t)
  (setq indent-p (reporter-beautify-list maxwidth compact-p))
  (if linebreak (progn (goto-char linebreak) (newline-and-indent) (setq linebreak nil)) (goto-char here) (setq indent-p (reporter-beautify-list maxwidth compact-p)) (goto-char here) (forward-sexp 1) (if indent-p (newline-and-indent)) t)
  (if (<= maxwidth (current-column)) (if linebreak (progn ... ... ...) (goto-char here) (setq indent-p ...) (goto-char here) (forward-sexp 1) (if indent-p ...) t) (if compact-p (setq linebreak ...) (newline-and-indent)))
  (while move (setq here (point)) (setq move (scan-sexps ... 1)) (goto-char move) (if (<= maxwidth ...) (if linebreak ... ... ... ... ... ... t) (if compact-p ... ...)))
  (progn (down-list 1) (setq indent-enclosing-p t) (while move (setq here ...) (setq move ...) (goto-char move) (if ... ... ...)) t)
  (condition-case nil (progn (down-list 1) (setq indent-enclosing-p t) (while move ... ... ... ...) t) (error indent-enclosing-p))
  (let ((move t) linebreak indent-enclosing-p indent-p here) (condition-case nil (progn ... ... ... t) (error indent-enclosing-p)))
  reporter-beautify-list(77 t)
  (let ((compact-p ...) (lisp-indent-function ...)) (goto-char here) (reporter-beautify-list maxwidth compact-p))
  (save-excursion (let (... ...) (goto-char here) (reporter-beautify-list maxwidth compact-p)))
  (if (and val (listp val) (<= maxwidth ...)) (save-excursion (let ... ... ...)))
  (let ((val ...) (sym ...) (print-escape-newlines t) (maxwidth ...) (here ...)) (insert "     " sym " " (cond ... ... ... ...) (prin1-to-string val)) (lisp-indent-line) (if (and val ... ...) (save-excursion ...)) (insert "\n"))
  (condition-case nil (let (... ... ... ... ...) (insert "     " sym " " ... ...) (lisp-indent-line) (if ... ...) (insert "\n")) (void-variable (with-current-buffer mailbuf ... ... ...)) (error (error "")))
  reporter-dump-variable(org-mode-hook #<buffer *unsent mail*>)
  funcall(reporter-dump-variable org-mode-hook #<buffer *unsent mail*>)
  (let ((varsym ...) (printer ...)) (funcall printer varsym mailbuf))
  (lambda (varsym-or-cons-cell) (let (... ...) (funcall printer varsym mailbuf)))(org-mode-hook)
  mapc((lambda (varsym-or-cons-cell) (let (... ...) (funcall printer varsym mailbuf))) (org-log-done org-export-preprocess-before-backend-specifics-hook org-export-latex-after-initial-vars-hook org-special-ctrl-a/e org-speed-command-hook org-agenda-files org-agenda-include-diary org-tag-faces org-export-latex-default-packages-alist org-hide-leading-stars org-metaup-hook org-after-todo-state-change-hook org-agenda-text-search-extra-files org-alphabetical-lists org-odd-levels-only org-use-fast-tag-selection outline-minor-mode-prefix org-export-blocks-postblock-hook org-agenda-restore-windows-after-quit org-export-latex-format-toc-function org-hide-emphasis-markers org-capture-before-finalize-hook org-tab-first-hook org-src-mode-hook org-confirm-shell-link-function org-export-first-hook org-highlight-latex-fragments-and-specials org-todo-keywords org-agenda-before-write-hook org-default-notes-file org-directory org-blank-before-new-entry org-babel-pre-tangle-hook org-cycle-hook org-export-preprocess-before-normalizing-links-hook org-use-speed-commands org-fontify-done-headline org-mode-hook org-font-lock-hook org-ctrl-c-ctrl-c-hook org-confirm-elisp-link-function org-fast-tag-selection-single-key org-log-into-drawer org-agenda-mode-hook org-agenda-start-on-weekday org-export-interblocks org-clock-out-hook org-reverse-note-order org-occur-hook org-tag-persistent-alist ...))
  (save-current-buffer (set-buffer elbuf) (emacs-lisp-mode) (erase-buffer) (insert "(setq\n") (lisp-indent-line) (mapc (function ...) varlist) (lisp-indent-line) (insert ")\n"))
  (with-current-buffer elbuf (emacs-lisp-mode) (erase-buffer) (insert "(setq\n") (lisp-indent-line) (mapc (function ...) varlist) (lisp-indent-line) (insert ")\n"))
  (let ((mailbuf ...) (elbuf ...)) (with-current-buffer elbuf (emacs-lisp-mode) (erase-buffer) (insert "(setq\n") (lisp-indent-line) (mapc ... varlist) (lisp-indent-line) (insert ")\n")) (insert-buffer-substring elbuf))
  (condition-case fault (let (... ...) (with-current-buffer elbuf ... ... ... ... ... ... ...) (insert-buffer-substring elbuf)) (error (insert "State could not be dumped due to the following error:\n\n" ... "\n\nYou should still send this bug report.")))
  (if (not varlist) nil (insert "\ncurrent state:\n==============\n") (condition-case fault (let ... ... ...) (error ...)))
  (let ((buffer ...)) (set-buffer buffer) (insert "Emacs  : " (emacs-version) "\n") (and pkgname (insert "Package: " pkgname "\n")) (run-hooks (quote pre-hooks)) (if (not varlist) nil (insert "\ncurrent state:\n==============\n") (condition-case fault ... ...)) (run-hooks (quote post-hooks)))
  reporter-dump-state("Org-mode version 7.7" (org-log-done org-export-preprocess-before-backend-specifics-hook org-export-latex-after-initial-vars-hook org-special-ctrl-a/e org-speed-command-hook org-agenda-files org-agenda-include-diary org-tag-faces org-export-latex-default-packages-alist org-hide-leading-stars org-metaup-hook org-after-todo-state-change-hook org-agenda-text-search-extra-files org-alphabetical-lists org-odd-levels-only org-use-fast-tag-selection outline-minor-mode-prefix org-export-blocks-postblock-hook org-agenda-restore-windows-after-quit org-export-latex-format-toc-function org-hide-emphasis-markers org-capture-before-finalize-hook org-tab-first-hook org-src-mode-hook org-confirm-shell-link-function org-export-first-hook org-highlight-latex-fragments-and-specials org-todo-keywords org-agenda-before-write-hook org-default-notes-file org-directory org-blank-before-new-entry org-babel-pre-tangle-hook org-cycle-hook org-export-preprocess-before-normalizing-links-hook org-use-speed-commands org-fontify-done-headline org-mode-hook org-font-lock-hook org-ctrl-c-ctrl-c-hook org-confirm-elisp-link-function org-fast-tag-selection-single-key org-log-into-drawer org-agenda-mode-hook org-agenda-start-on-weekday org-export-interblocks org-clock-out-hook org-reverse-note-order org-occur-hook org-tag-persistent-alist ...) nil nil)
  (progn (setq final-resting-place (point-marker)) (insert "\n\n") (reporter-dump-state pkgname varlist pre-hooks post-hooks) (goto-char final-resting-place))
  (unwind-protect (progn (setq final-resting-place ...) (insert "\n\n") (reporter-dump-state pkgname varlist pre-hooks post-hooks) (goto-char final-resting-place)) (set-marker final-resting-place nil))
  (let ((reporter-eval-buffer ...) final-resting-place after-sep-pos (reporter-status-message "Formatting bug report buffer...") (reporter-status-count 0) (problem ...) (agent ...) (mailbuf ...) hookvar) (require (quote sendmail)) (let (same-window-buffer-names same-window-regexps) (pop-to-buffer mailbuf) (and pop-up-windows ...)) (goto-char (point-min)) (mail-position-on-field "to") (insert address) (if (and reporter-prompt-for-summary-p problem pkgname) (progn ... ...)) (mail-text) (forward-line 1) (setq after-sep-pos (point)) (and salutation (insert "\n" salutation "\n\n")) (unwind-protect (progn ... ... ... ...) (set-marker final-resting-place nil)) (save-excursion (goto-char ...) (skip-chars-backward " 	\n") (setq reporter-initial-text ...)) (if (setq hookvar ...) (add-hook hookvar ... nil t)) (let* (... ... ... ...) (message "Please enter your report.  Type %s to send, %s to abort." sendkey abortkey)))
  ad-Orig-reporter-submit-bug-report("emacs-orgmode@gnu.org" "Org-mode version 7.7" (org-log-done org-export-preprocess-before-backend-specifics-hook org-export-latex-after-initial-vars-hook org-special-ctrl-a/e org-speed-command-hook org-agenda-files org-agenda-include-diary org-tag-faces org-export-latex-default-packages-alist org-hide-leading-stars org-metaup-hook org-after-todo-state-change-hook org-agenda-text-search-extra-files org-alphabetical-lists org-odd-levels-only org-use-fast-tag-selection outline-minor-mode-prefix org-export-blocks-postblock-hook org-agenda-restore-windows-after-quit org-export-latex-format-toc-function org-hide-emphasis-markers org-capture-before-finalize-hook org-tab-first-hook org-src-mode-hook org-confirm-shell-link-function org-export-first-hook org-highlight-latex-fragments-and-specials org-todo-keywords org-agenda-before-write-hook org-default-notes-file org-directory org-blank-before-new-entry org-babel-pre-tangle-hook org-cycle-hook org-export-preprocess-before-normalizing-links-hook org-use-speed-commands org-fontify-done-headline org-mode-hook org-font-lock-hook org-ctrl-c-ctrl-c-hook org-confirm-elisp-link-function org-fast-tag-selection-single-key org-log-into-drawer org-agenda-mode-hook org-agenda-start-on-weekday org-export-interblocks org-clock-out-hook org-reverse-note-order org-occur-hook org-tag-persistent-alist ...) nil nil "Remember to cover the basics, that is, what you expected to happen and\nwhat in fact did happen.  You don't know how to make a good report?  See\n\n     http://orgmode.org/manual/Feedback.html#Feedback\n\nYour bug report will be posted to the Org-mode mailing list.\n------------------------------------------------------------------------")
  reporter-submit-bug-report("emacs-orgmode@gnu.org" "Org-mode version 7.7" (org-log-done org-export-preprocess-before-backend-specifics-hook org-export-latex-after-initial-vars-hook org-special-ctrl-a/e org-speed-command-hook org-agenda-files org-agenda-include-diary org-tag-faces org-export-latex-default-packages-alist org-hide-leading-stars org-metaup-hook org-after-todo-state-change-hook org-agenda-text-search-extra-files org-alphabetical-lists org-odd-levels-only org-use-fast-tag-selection outline-minor-mode-prefix org-export-blocks-postblock-hook org-agenda-restore-windows-after-quit org-export-latex-format-toc-function org-hide-emphasis-markers org-capture-before-finalize-hook org-tab-first-hook org-src-mode-hook org-confirm-shell-link-function org-export-first-hook org-highlight-latex-fragments-and-specials org-todo-keywords org-agenda-before-write-hook org-default-notes-file org-directory org-blank-before-new-entry org-babel-pre-tangle-hook org-cycle-hook org-export-preprocess-before-normalizing-links-hook org-use-speed-commands org-fontify-done-headline org-mode-hook org-font-lock-hook org-ctrl-c-ctrl-c-hook org-confirm-elisp-link-function org-fast-tag-selection-single-key org-log-into-drawer org-agenda-mode-hook org-agenda-start-on-weekday org-export-interblocks org-clock-out-hook org-reverse-note-order org-occur-hook org-tag-persistent-alist ...) nil nil "Remember to cover the basics, that is, what you expected to happen and\nwhat in fact did happen.  You don't know how to make a good report?  See\n\n     http://orgmode.org/manual/Feedback.html#Feedback\n\nYour bug report will be posted to the Org-mode mailing list.\n------------------------------------------------------------------------")
  (let ((reporter-prompt-for-summary-p "Bug report subject: ")) (reporter-submit-bug-report "emacs-orgmode@gnu.org" (org-version) (let ... ...) nil nil "Remember to cover the basics, that is, what you expected to happen and\nwhat in fact did happen.  You don't know how to make a good report?  See\n\n     http://orgmode.org/manual/Feedback.html#Feedback\n\nYour bug report will be posted to the Org-mode mailing list.\n------------------------------------------------------------------------") (save-excursion (if ... ...)))
  org-submit-bug-report()
  call-interactively(org-submit-bug-report nil nil)