API tools faq
paste
rebcabin

emacs-live traceback

rebcabin
Mar 4th, 2015
38
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 15.02 KB | None | 0 0
raw download clone embed print report
  1. Debugger entered--Lisp error: (file-error "Searching for program" "no such file or directory" "/bin/false")
  2. call-process("/bin/false" nil t nil "-l" "-i" "-c" "/usr/bin/printf '__RESULT\\000%s\\000%s' \"${PATH-}\" \"${MANPATH-}\"")
  3. apply(call-process "/bin/false" nil t nil ("-l" "-i" "-c" "/usr/bin/printf '__RESULT\\000%s\\000%s' \"${PATH-}\" \"${MANPATH-}\""))
  4. (let ((exit-code (apply (function call-process) shell nil t nil shell-args))) (exec-path-from-shell--debug "Shell printed: %S" (buffer-string)) (if (zerop exit-code) nil (error "Non-zero exit code from shell %s invoked with args %S. Output was:\n%S" shell shell-args (buffer-string))))
  5. (progn (exec-path-from-shell--debug "Invoking shell %s with args %S" shell shell-args) (let ((exit-code (apply (function call-process) shell nil t nil shell-args))) (exec-path-from-shell--debug "Shell printed: %S" (buffer-string)) (if (zerop exit-code) nil (error "Non-zero exit code from shell %s invoked with args %S. Output was:\n%S" shell shell-args (buffer-string)))) (goto-char (point-min)) (if (re-search-forward "__RESULT\\(.*\\)" nil t) (match-string 1) (error "Expected printf output from shell, but got: %S" (buffer-string))))
  6. (unwind-protect (progn (exec-path-from-shell--debug "Invoking shell %s with args %S" shell shell-args) (let ((exit-code (apply (function call-process) shell nil t nil shell-args))) (exec-path-from-shell--debug "Shell printed: %S" (buffer-string)) (if (zerop exit-code) nil (error "Non-zero exit code from shell %s invoked with args %S. Output was:\n%S" shell shell-args (buffer-string)))) (goto-char (point-min)) (if (re-search-forward "__RESULT\\(.*\\)" nil t) (match-string 1) (error "Expected printf output from shell, but got: %S" (buffer-string)))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))
  7. (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (exec-path-from-shell--debug "Invoking shell %s with args %S" shell shell-args) (let ((exit-code (apply (function call-process) shell nil t nil shell-args))) (exec-path-from-shell--debug "Shell printed: %S" (buffer-string)) (if (zerop exit-code) nil (error "Non-zero exit code from shell %s invoked with args %S. Output was:\n%S" shell shell-args (buffer-string)))) (goto-char (point-min)) (if (re-search-forward "__RESULT\\(.*\\)" nil t) (match-string 1) (error "Expected printf output from shell, but got: %S" (buffer-string)))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))
  8. (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (exec-path-from-shell--debug "Invoking shell %s with args %S" shell shell-args) (let ((exit-code (apply ... shell nil t nil shell-args))) (exec-path-from-shell--debug "Shell printed: %S" (buffer-string)) (if (zerop exit-code) nil (error "Non-zero exit code from shell %s invoked with args %S. Output was:\n%S" shell shell-args (buffer-string)))) (goto-char (point-min)) (if (re-search-forward "__RESULT\\(.*\\)" nil t) (match-string 1) (error "Expected printf output from shell, but got: %S" (buffer-string)))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))
  9. (let* ((printf-bin (or (executable-find "printf") "printf")) (printf-command (concat printf-bin " '__RESULT\\000" str "' " (mapconcat (function exec-path-from-shell--double-quote) args " "))) (shell-args (append exec-path-from-shell-arguments (list "-c" (if (exec-path-from-shell--standard-shell-p (getenv "SHELL")) printf-command (concat "sh -c " (shell-quote-argument printf-command)))))) (shell (getenv "SHELL"))) (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (exec-path-from-shell--debug "Invoking shell %s with args %S" shell shell-args) (let ((exit-code ...)) (exec-path-from-shell--debug "Shell printed: %S" (buffer-string)) (if (zerop exit-code) nil (error "Non-zero exit code from shell %s invoked with args %S. Output was:\n%S" shell shell-args ...))) (goto-char (point-min)) (if (re-search-forward "__RESULT\\(.*\\)" nil t) (match-string 1) (error "Expected printf output from shell, but got: %S" (buffer-string)))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))))
  10. exec-path-from-shell-printf("%s\\000%s" ("${PATH-}" "${MANPATH-}"))
  11. (split-string (exec-path-from-shell-printf (mapconcat (function identity) (make-list (length names) "%s") "\\000") dollar-names) "")
  12. (let* ((dollar-names (mapcar (function (lambda (n) (format "${%s-}" n))) names)) (values (split-string (exec-path-from-shell-printf (mapconcat (function identity) (make-list (length names) "%s") "\\000") dollar-names) ""))) (let (result) (while names (prog1 (setq result (cons (cons (car names) (car values)) result)) (setq values (cdr values) names (cdr names)))) result))
  13. exec-path-from-shell-getenvs(("PATH" "MANPATH"))
  14. (mapc (function (lambda (pair) (exec-path-from-shell-setenv (car pair) (cdr pair)))) (exec-path-from-shell-getenvs names))
  15. exec-path-from-shell-copy-envs(("PATH" "MANPATH"))
  16. exec-path-from-shell-initialize()
  17. eval-buffer(#<buffer *load*-408069> nil "/Users/someuser/.emacs.d/packs/stable/foundation-pack/config/osx.el" nil t) ; Reading at buffer position 885
  18. load-with-code-conversion("/Users/someuser/.emacs.d/packs/stable/foundation-pack/config/osx.el" "/Users/someuser/.emacs.d/packs/stable/foundation-pack/config/osx.el" nil nil)
  19. #<subr load>("/Users/someuser/.emacs.d/packs/stable/foundation-pack/config/osx.el" nil nil t nil)
  20. ad-Advice-load(#<subr load> "/Users/someuser/.emacs.d/packs/stable/foundation-pack/config/osx.el" nil nil t)
  21. apply(ad-Advice-load #<subr load> ("/Users/someuser/.emacs.d/packs/stable/foundation-pack/config/osx.el" nil nil t))
  22. load("/Users/someuser/.emacs.d/packs/stable/foundation-pack/config/osx.el" nil nil t)
  23. load-file("/Users/someuser/.emacs.d/packs/stable/foundation-pack/config/osx.el")
  24. (let* ((config-dir (live-pack-config-dir))) (load-file (concat config-dir f-name)))
  25. live-load-config-file("osx.el")
  26. (progn (live-load-config-file "osx.el"))
  27. (if (eq system-type (quote darwin)) (progn (live-load-config-file "osx.el")))
  28. eval-buffer(#<buffer *load*-306516> nil "/Users/someuser/.emacs.d/packs/stable/foundation-pack/init.el" nil t) ; Reading at buffer position 1396
  29. load-with-code-conversion("/Users/someuser/.emacs.d/packs/stable/foundation-pack/init.el" "/Users/someuser/.emacs.d/packs/stable/foundation-pack/init.el" nil nil)
  30. load("/Users/someuser/.emacs.d/packs/stable/foundation-pack/init.el" nil nil t)
  31. load-file("/Users/someuser/.emacs.d/packs/stable/foundation-pack/init.el")
  32. (if (file-exists-p pack-init) (load-file pack-init))
  33. (let* ((pack-dir (file-name-as-directory pack-dir)) (pack-info (concat pack-dir "info.el")) (pack-init (concat pack-dir "init.el"))) (setq live-current-pack-dir pack-dir) (live-clear-pack-info) (if (file-exists-p pack-info) (load-file pack-info) (message (concat "Error - could not find info.el file for pack with location: " pack-dir))) (live-print-pack-info) (add-to-list (quote load-path) (live-pack-lib-dir)) (if (file-exists-p pack-init) (load-file pack-init)) (setq live-current-pack-dir nil))
  34. live-load-pack("/Users/someuser/.emacs.d/packs/stable/foundation-pack/")
  35. (lambda (pack-dir) (live-load-pack pack-dir))("/Users/someuser/.emacs.d/packs/stable/foundation-pack/")
  36. mapc((lambda (pack-dir) (live-load-pack pack-dir)) ("/Users/someuser/.emacs.d/packs/stable/foundation-pack/" "/Users/someuser/.emacs.d/packs/stable/colour-pack/" "/Users/someuser/.emacs.d/packs/stable/lang-pack/" "/Users/someuser/.emacs.d/packs/stable/power-pack/" "/Users/someuser/.emacs.d/packs/stable/git-pack/" "/Users/someuser/.emacs.d/packs/stable/org-pack/" "/Users/someuser/.emacs.d/packs/stable/clojure-pack/" "/Users/someuser/.emacs.d/packs/stable/bindings-pack/" "~/.live-packs/someuser-pack/"))
  37. (progn (setq live-root-dir (if (boundp (quote live-root-dir)) (file-name-as-directory live-root-dir) (if (file-exists-p (expand-file-name "manifest.el" user-emacs-directory)) user-emacs-directory) (file-name-directory (or load-file-name buffer-file-name)))) (setq live-tmp-dir (file-name-as-directory (concat live-root-dir "tmp")) live-etc-dir (file-name-as-directory (concat live-root-dir "etc")) live-pscratch-dir (file-name-as-directory (concat live-tmp-dir "pscratch")) live-lib-dir (file-name-as-directory (concat live-root-dir "lib")) live-packs-dir (file-name-as-directory (concat live-root-dir "packs")) live-autosaves-dir (file-name-as-directory (concat live-tmp-dir "autosaves")) live-backups-dir (file-name-as-directory (concat live-tmp-dir "backups")) live-custom-dir (file-name-as-directory (concat live-etc-dir "custom")) live-load-pack-dir nil live-disable-zone nil) (make-directory live-etc-dir t) (make-directory live-tmp-dir t) (make-directory live-autosaves-dir t) (make-directory live-backups-dir t) (make-directory live-custom-dir t) (make-directory live-pscratch-dir t) (load-file (concat live-root-dir "manifest.el")) (load-file (concat live-lib-dir "live-core.el")) (let* ((pack-names (quote ("foundation-pack" "colour-pack" "lang-pack" "power-pack" "git-pack" "org-pack" "clojure-pack" "bindings-pack"))) (live-dir (file-name-as-directory "stable")) (dev-dir (file-name-as-directory "dev"))) (setq live-packs (mapcar (function (lambda (p) (concat live-dir p))) pack-names)) (setq live-dev-pack-list (mapcar (function (lambda (p) (concat dev-dir p))) pack-names))) (defalias (quote live-version) (function (lambda nil (interactive) (if (called-interactively-p (quote interactive)) (message "%s" (concat "This is Emacs Live " live-version)) live-version)))) (let* ((pack-file (concat (file-name-as-directory "~") ".emacs-live.el"))) (if (and (file-exists-p pack-file) (not live-safe-modep)) (load-file pack-file))) (mapc (function (lambda (pack-dir) (live-load-pack pack-dir))) (live-pack-dirs)) (setq live-welcome-messages (if (live-user-first-name-p) (list (concat "Hello " (live-user-first-name) ", somewhere in the world the sun is shining for you right now.") (concat "Hello " (live-user-first-name) ", it's lovely to see you again. I do hope that you're well.") (concat (live-user-first-name) ", turn your head towards the sun and the shadows will fall behind you.")) (list "Hello, somewhere in the world the sun is shining for you right now." "Hello, it's lovely to see you again. I do hope that you're well." "Turn your head towards the sun and the shadows will fall behind you."))) (defalias (quote live-welcome-message) (function (lambda nil (nth (random (length live-welcome-messages)) live-welcome-messages)))) (if live-supported-emacsp (progn (setq initial-scratch-message (concat live-ascii-art-logo " Version " live-version (if live-safe-modep "\n;; --*SAFE MODE*--" "\n;;") "\n;; http://github.com/overtone/emacs-live\n;;\n;; " (live-welcome-message) "\n\n")))))
  38. (if live-supported-emacsp (progn (setq live-root-dir (if (boundp (quote live-root-dir)) (file-name-as-directory live-root-dir) (if (file-exists-p (expand-file-name "manifest.el" user-emacs-directory)) user-emacs-directory) (file-name-directory (or load-file-name buffer-file-name)))) (setq live-tmp-dir (file-name-as-directory (concat live-root-dir "tmp")) live-etc-dir (file-name-as-directory (concat live-root-dir "etc")) live-pscratch-dir (file-name-as-directory (concat live-tmp-dir "pscratch")) live-lib-dir (file-name-as-directory (concat live-root-dir "lib")) live-packs-dir (file-name-as-directory (concat live-root-dir "packs")) live-autosaves-dir (file-name-as-directory (concat live-tmp-dir "autosaves")) live-backups-dir (file-name-as-directory (concat live-tmp-dir "backups")) live-custom-dir (file-name-as-directory (concat live-etc-dir "custom")) live-load-pack-dir nil live-disable-zone nil) (make-directory live-etc-dir t) (make-directory live-tmp-dir t) (make-directory live-autosaves-dir t) (make-directory live-backups-dir t) (make-directory live-custom-dir t) (make-directory live-pscratch-dir t) (load-file (concat live-root-dir "manifest.el")) (load-file (concat live-lib-dir "live-core.el")) (let* ((pack-names (quote ("foundation-pack" "colour-pack" "lang-pack" "power-pack" "git-pack" "org-pack" "clojure-pack" "bindings-pack"))) (live-dir (file-name-as-directory "stable")) (dev-dir (file-name-as-directory "dev"))) (setq live-packs (mapcar (function (lambda (p) (concat live-dir p))) pack-names)) (setq live-dev-pack-list (mapcar (function (lambda (p) (concat dev-dir p))) pack-names))) (defalias (quote live-version) (function (lambda nil (interactive) (if (called-interactively-p (quote interactive)) (message "%s" (concat "This is Emacs Live " live-version)) live-version)))) (let* ((pack-file (concat (file-name-as-directory "~") ".emacs-live.el"))) (if (and (file-exists-p pack-file) (not live-safe-modep)) (load-file pack-file))) (mapc (function (lambda (pack-dir) (live-load-pack pack-dir))) (live-pack-dirs)) (setq live-welcome-messages (if (live-user-first-name-p) (list (concat "Hello " (live-user-first-name) ", somewhere in the world the sun is shining for you right now.") (concat "Hello " (live-user-first-name) ", it's lovely to see you again. I do hope that you're well.") (concat (live-user-first-name) ", turn your head towards the sun and the shadows will fall behind you.")) (list "Hello, somewhere in the world the sun is shining for you right now." "Hello, it's lovely to see you again. I do hope that you're well." "Turn your head towards the sun and the shadows will fall behind you."))) (defalias (quote live-welcome-message) (function (lambda nil (nth (random (length live-welcome-messages)) live-welcome-messages)))) (if live-supported-emacsp (progn (setq initial-scratch-message (concat live-ascii-art-logo " Version " live-version (if live-safe-modep "\n;; --*SAFE MODE*--" "\n;;") "\n;; http://github.com/overtone/emacs-live\n;;\n;; " (live-welcome-message) "\n\n"))))))
  39. eval-buffer(#<buffer *load*> nil "/Users/someuser/.emacs.d/init.el" nil t) ; Reading at buffer position 8318
  40. load-with-code-conversion("/Users/someuser/.emacs.d/init.el" "/Users/someuser/.emacs.d/init.el" t t)
  41. load("/Users/someuser/.emacs.d/init" t t)
  42. #[0 "\205\262 \306=\203\307\310Q\202; \311=\204\307\312Q\202;\313\307\314\315#\203*\316\202;\313\307\314\317#\203:\320\nB\321\202;\316\322\323\322\211#\210 \322=\203a\324\325\326\307\327Q!\"\323\322\211#\210 \322=\203`\210 \203\243\330 !\331\232\203\243\332 !\211\333P\334!\203}\211\202\210\334!\203\207\202\210\314\262\203\241\335 \"\203\237\336\337 #\210\340\341!\210\266\f?\205\260\314\323\342\322\211#)\262\207" [init-file-user system-type delayed-warnings-list user-init-file inhibit-default-init inhibit-startup-screen ms-dos "~" "/_emacs" windows-nt "/.emacs" directory-files nil "^\\.emacs\\(\\.elc?\\)?$" "~/.emacs" "^_emacs\\(\\.elc?\\)?$" (initialization "`_emacs' init file is deprecated, please use `.emacs'") "~/_emacs" t load expand-file-name "init" file-name-as-directory "/.emacs.d" file-name-extension "elc" file-name-sans-extension ".el" file-exists-p file-newer-than-file-p message "Warning: %s is newer than %s" sit-for 1 "default"] 7 "\n\n(fn)"]()
  43. command-line()
  44. normal-top-level()
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!