66

Debugger entered--Lisp error: (void-function -mode)
  -mode()
  funcall(-mode)
  (progn (insert body) (goto-char (point-min)) (funcall (intern ...)) (setq index (point)) (while (and ...) (save-match-data ...) (save-match-data ...) (save-match-data ...) (goto-char ...) (nb-add ...) (goto-char ...) (setq index ...) (nb-add ...)) (nb-add (buffer-substring index ...)))
  (unwind-protect (progn (insert body) (goto-char ...) (funcall ...) (setq index ...) (while ... ... ... ... ... ... ... ... ...) (nb-add ...)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))
  (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn ... ... ... ... ... ...) (and ... ...)))
  (with-current-buffer temp-buffer (unwind-protect (progn ... ... ... ... ... ...) (and ... ...)))
  (let ((temp-buffer ...)) (with-current-buffer temp-buffer (unwind-protect ... ...)))
  (with-temp-buffer (insert body) (goto-char (point-min)) (funcall (intern ...)) (setq index (point)) (while (and ...) (save-match-data ...) (save-match-data ...) (save-match-data ...) (goto-char ...) (nb-add ...) (goto-char ...) (setq index ...) (nb-add ...)) (nb-add (buffer-substring index ...)))
  (progn (fset (quote nb-add) (function* ...)) (with-temp-buffer (insert body) (goto-char ...) (funcall ...) (setq index ...) (while ... ... ... ... ... ... ... ... ...) (nb-add ...)))
  (unwind-protect (progn (fset ... ...) (with-temp-buffer ... ... ... ... ... ...)) (if --cl-letf-bound-- (fset ... --cl-letf-save--) (fmakunbound ...)))
  (let* ((--cl-letf-bound-- ...) (--cl-letf-save-- ...)) (unwind-protect (progn ... ...) (if --cl-letf-bound-- ... ...)))
  (letf ((... ...)) (with-temp-buffer (insert body) (goto-char ...) (funcall ...) (setq index ...) (while ... ... ... ... ... ... ... ... ...) (nb-add ...)))
  (letf* ((... ...)) (with-temp-buffer (insert body) (goto-char ...) (funcall ...) (setq index ...) (while ... ... ... ... ... ... ... ... ...) (nb-add ...)))
  (flet ((nb-add ... ...)) (with-temp-buffer (insert body) (goto-char ...) (funcall ...) (setq index ...) (while ... ... ... ... ... ... ... ... ...) (nb-add ...)))
  (let* ((parent-buffer ...) (info ...) (lang ...) (body ...) (new-body "") index source-name evaluate prefix) (flet (...) (with-temp-buffer ... ... ... ... ... ...)) new-body)
  org-babel-expand-noweb-references(("" "(defun make-path (path)\n  (concat conf path))\n" ((:cache . "no") (:noweb . "no") (:tangle . "yes") (:exports . "code") (:results . "replace") (:session . "none")) #("emacs-lisp " 0 11 (fontified t font-lock-fontified t face org-meta-line font-lock-multiline t))))
  (let* ((link ...) (info ...) (source-name ...) (src-lang ...) (body ...) (params ...) (spec ...) by-lang) (unless (string= ... "no") (unless ... ... ... ...)))
  (progn (setq block-counter (+ 1 block-counter)) (let* (... ... ... ... ... ... ... by-lang) (unless ... ...)))
  (unwind-protect (progn (setq block-counter ...) (let* ... ...)) (set-match-data save-match-data-internal (quote evaporate)))
  (let ((save-match-data-internal ...)) (unwind-protect (progn ... ...) (set-match-data save-match-data-internal ...)))
  (save-match-data (setq block-counter (+ 1 block-counter)) (let* (... ... ... ... ... ... ... by-lang) (unless ... ...)))
  (while (re-search-forward org-babel-src-block-regexp nil t) (goto-char (match-beginning 0)) (save-match-data (setq block-counter ...) (let* ... ...)) (goto-char (match-end 0)))
  (save-window-excursion (find-file (buffer-file-name)) (goto-char (point-min)) (while (re-search-forward org-babel-src-block-regexp nil t) (goto-char ...) (save-match-data ... ...) (goto-char ...)))
  (let ((visited-p ...)) (save-window-excursion (find-file ...) (goto-char ...) (while ... ... ... ...)) (unless visited-p (kill-buffer ...)))
  (org-babel-map-source-blocks (buffer-file-name) (setq block-counter (+ 1 block-counter)) (let* (... ... ... ... ... ... ... by-lang) (unless ... ...)))
  (let ((block-counter 0) blocks) (org-babel-map-source-blocks (buffer-file-name) (setq block-counter ...) (let* ... ...)) (setq blocks (mapcar ... blocks)) blocks)
  org-babel-tangle-collect-blocks(nil)
  (mapc (lambda (by-lang) (let* ... ...)) (org-babel-tangle-collect-blocks lang))
  (let ((block-counter 0) path-collector) (mapc (lambda ... ...) (org-babel-tangle-collect-blocks lang)) (message "tangled %d code block%s" block-counter (if ... "" "s")) path-collector)
  (save-excursion (let (... path-collector) (mapc ... ...) (message "tangled %d code block%s" block-counter ...) path-collector))
  org-babel-tangle(nil nil)
  (save-window-excursion (find-file file) (org-babel-tangle target-file lang))
  org-babel-tangle-file("~/Documents/pycon/miniconf.org")
  eval((org-babel-tangle-file (concat base "miniconf.org")))
  eval-last-sexp-1(nil)
  eval-last-sexp(nil)
  call-interactively(eval-last-sexp nil nil)