Created
March 14, 2016 14:34
-
-
Save incandescentman/4c52f46f96a50508e7a2 to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p nil) | |
>(nil 1048576) | |
(if (> (nth 7 (file-attributes (buffer-file-name))) (* 1024 1024 dotspacemacs-large-file-size)) (progn (if (y-or-n-p "This is a large file, open literally to avoid performance issues?") (progn (setq buffer-read-only t) (buffer-disable-undo) (fundamental-mode))))) | |
spacemacs/check-large-file() | |
run-hooks(find-file-hook) | |
after-find-file(t t) | |
find-file-noselect-1(#<buffer rollback-info> "~/.emacs.d/.cache/.rollback/16-03-14_10.33.35/rollback-info" nil nil "~/emacs/spacemacs/.cache/.rollback/16-03-14_10.33.35/rollback-info" nil) | |
find-file-noselect("/Users/jay/.emacs.d/.cache/.rollback/16-03-14_10.33.35/rollback-info") | |
(let ((buf (find-file-noselect filename))) (set-buffer buf) (erase-buffer) (spacemacs/dump varlist buf) (make-directory (file-name-directory filename) t) (save-buffer) (kill-buffer)) | |
(save-excursion (let ((buf (find-file-noselect filename))) (set-buffer buf) (erase-buffer) (spacemacs/dump varlist buf) (make-directory (file-name-directory filename) t) (save-buffer) (kill-buffer))) | |
spacemacs/dump-vars-to-file((update-packages-alist) "/Users/jay/.emacs.d/.cache/.rollback/16-03-14_10.33.35/rollback-info") | |
(if (and (not always-update) (not (yes-or-no-p (format "Do you want to update %s package(s) ? " upgrade-count)))) (spacemacs-buffer/append "Packages update has been cancelled.\n" t) (spacemacs-buffer/append "--> performing backup of package(s) to update...\n" t) (spacemacs//redisplay) (let ((--dolist-tail-- update-packages) pkg) (while --dolist-tail-- (setq pkg (car --dolist-tail--)) (let* ((src-dir (configuration-layer//get-package-directory pkg)) (dest-dir (expand-file-name (concat rollback-dir ...)))) (copy-directory src-dir dest-dir (quote keeptime) (quote create) (quote copy-content)) (setq update-packages-alist (cons (cons pkg (file-name-nondirectory src-dir)) update-packages-alist))) (setq --dolist-tail-- (cdr --dolist-tail--)))) (spacemacs/dump-vars-to-file (quote (update-packages-alist)) (expand-file-name (concat rollback-dir configuration-layer-rollback-info))) (let ((--dolist-tail-- update-packages) pkg) (while --dolist-tail-- (setq pkg (car --dolist-tail--)) (setq upgraded-count (1+ upgraded-count)) (spacemacs-buffer/replace-last-line (format "--> preparing update of package %s... [%s/%s]" pkg upgraded-count upgrade-count) t) (spacemacs//redisplay) (configuration-layer//package-delete pkg) (setq --dolist-tail-- (cdr --dolist-tail--)))) (spacemacs-buffer/append (format "\n--> %s package(s) to be updated.\n" upgraded-count)) (spacemacs-buffer/append "\nEmacs has to be restarted to actually install the new packages.\n") (configuration-layer//cleanup-rollback-directory) (spacemacs//redisplay)) | |
(progn (spacemacs-buffer/append (format (concat "--> Found %s package(s) to update" (if (> skipped-count 0) (format " (skipped %s):\n" skipped-count) ":\n")) upgrade-count) t) (mapc (function (lambda (x) (spacemacs-buffer/append (format "%s\n" x) t))) (sort (mapcar (quote symbol-name) update-packages) (quote string<))) (if (and (not always-update) (not (yes-or-no-p (format "Do you want to update %s package(s) ? " upgrade-count)))) (spacemacs-buffer/append "Packages update has been cancelled.\n" t) (spacemacs-buffer/append "--> performing backup of package(s) to update...\n" t) (spacemacs//redisplay) (let ((--dolist-tail-- update-packages) pkg) (while --dolist-tail-- (setq pkg (car --dolist-tail--)) (let* ((src-dir (configuration-layer//get-package-directory pkg)) (dest-dir (expand-file-name ...))) (copy-directory src-dir dest-dir (quote keeptime) (quote create) (quote copy-content)) (setq update-packages-alist (cons (cons pkg ...) update-packages-alist))) (setq --dolist-tail-- (cdr --dolist-tail--)))) (spacemacs/dump-vars-to-file (quote (update-packages-alist)) (expand-file-name (concat rollback-dir configuration-layer-rollback-info))) (let ((--dolist-tail-- update-packages) pkg) (while --dolist-tail-- (setq pkg (car --dolist-tail--)) (setq upgraded-count (1+ upgraded-count)) (spacemacs-buffer/replace-last-line (format "--> preparing update of package %s... [%s/%s]" pkg upgraded-count upgrade-count) t) (spacemacs//redisplay) (configuration-layer//package-delete pkg) (setq --dolist-tail-- (cdr --dolist-tail--)))) (spacemacs-buffer/append (format "\n--> %s package(s) to be updated.\n" upgraded-count)) (spacemacs-buffer/append "\nEmacs has to be restarted to actually install the new packages.\n") (configuration-layer//cleanup-rollback-directory) (spacemacs//redisplay))) | |
(if (> upgrade-count 0) (progn (spacemacs-buffer/append (format (concat "--> Found %s package(s) to update" (if (> skipped-count 0) (format " (skipped %s):\n" skipped-count) ":\n")) upgrade-count) t) (mapc (function (lambda (x) (spacemacs-buffer/append (format "%s\n" x) t))) (sort (mapcar (quote symbol-name) update-packages) (quote string<))) (if (and (not always-update) (not (yes-or-no-p (format "Do you want to update %s package(s) ? " upgrade-count)))) (spacemacs-buffer/append "Packages update has been cancelled.\n" t) (spacemacs-buffer/append "--> performing backup of package(s) to update...\n" t) (spacemacs//redisplay) (let ((--dolist-tail-- update-packages) pkg) (while --dolist-tail-- (setq pkg (car --dolist-tail--)) (let* ((src-dir ...) (dest-dir ...)) (copy-directory src-dir dest-dir (quote keeptime) (quote create) (quote copy-content)) (setq update-packages-alist (cons ... update-packages-alist))) (setq --dolist-tail-- (cdr --dolist-tail--)))) (spacemacs/dump-vars-to-file (quote (update-packages-alist)) (expand-file-name (concat rollback-dir configuration-layer-rollback-info))) (let ((--dolist-tail-- update-packages) pkg) (while --dolist-tail-- (setq pkg (car --dolist-tail--)) (setq upgraded-count (1+ upgraded-count)) (spacemacs-buffer/replace-last-line (format "--> preparing update of package %s... [%s/%s]" pkg upgraded-count upgrade-count) t) (spacemacs//redisplay) (configuration-layer//package-delete pkg) (setq --dolist-tail-- (cdr --dolist-tail--)))) (spacemacs-buffer/append (format "\n--> %s package(s) to be updated.\n" upgraded-count)) (spacemacs-buffer/append "\nEmacs has to be restarted to actually install the new packages.\n") (configuration-layer//cleanup-rollback-directory) (spacemacs//redisplay)))) | |
(let* ((update-packages (configuration-layer//get-packages-to-update (mapcar (quote car) (object-assoc-list :name configuration-layer--used-distant-packages)))) (skipped-count (length configuration-layer--skipped-packages)) (date (format-time-string "%y-%m-%d_%H.%M.%S")) (rollback-dir (expand-file-name (concat configuration-layer-rollback-directory (file-name-as-directory date)))) (upgrade-count (length update-packages)) (upgraded-count 0) (update-packages-alist)) (if configuration-layer--skipped-packages (progn (spacemacs-buffer/append (format (concat "--> Warning: cannot update %s package(s), possibly due" " to a temporary network problem: %s\n") skipped-count (mapconcat (function symbol-name) configuration-layer--skipped-packages " "))))) (if (> upgrade-count 0) (progn (spacemacs-buffer/append (format (concat "--> Found %s package(s) to update" (if (> skipped-count 0) (format " (skipped %s):\n" skipped-count) ":\n")) upgrade-count) t) (mapc (function (lambda (x) (spacemacs-buffer/append (format "%s\n" x) t))) (sort (mapcar (quote symbol-name) update-packages) (quote string<))) (if (and (not always-update) (not (yes-or-no-p (format "Do you want to update %s package(s) ? " upgrade-count)))) (spacemacs-buffer/append "Packages update has been cancelled.\n" t) (spacemacs-buffer/append "--> performing backup of package(s) to update...\n" t) (spacemacs//redisplay) (let ((--dolist-tail-- update-packages) pkg) (while --dolist-tail-- (setq pkg (car --dolist-tail--)) (let* (... ...) (copy-directory src-dir dest-dir ... ... ...) (setq update-packages-alist ...)) (setq --dolist-tail-- (cdr --dolist-tail--)))) (spacemacs/dump-vars-to-file (quote (update-packages-alist)) (expand-file-name (concat rollback-dir configuration-layer-rollback-info))) (let ((--dolist-tail-- update-packages) pkg) (while --dolist-tail-- (setq pkg (car --dolist-tail--)) (setq upgraded-count (1+ upgraded-count)) (spacemacs-buffer/replace-last-line (format "--> preparing update of package %s... [%s/%s]" pkg upgraded-count upgrade-count) t) (spacemacs//redisplay) (configuration-layer//package-delete pkg) (setq --dolist-tail-- (cdr --dolist-tail--)))) (spacemacs-buffer/append (format "\n--> %s package(s) to be updated.\n" upgraded-count)) (spacemacs-buffer/append "\nEmacs has to be restarted to actually install the new packages.\n") (configuration-layer//cleanup-rollback-directory) (spacemacs//redisplay)))) (if (eq upgrade-count 0) (progn (spacemacs-buffer/append "--> All packages are up to date.\n") (spacemacs//redisplay)))) | |
configuration-layer/update-packages() | |
(lambda (&rest ignore) (configuration-layer/update-packages))((push-button :args nil :value #("Update Packages" 0 15 (face font-lock-keyword-face)) :help-echo "Update all ELPA packages to the latest versions." :action (lambda (&rest ignore) (configuration-layer/update-packages)) :mouse-face highlight :follow-link " | |
" :button-overlay #<overlay from 231 to 248 in *spacemacs*> :from #<marker (moves after insertion) at 231 in *spacemacs*> :to #<marker at 248 in *spacemacs*>) nil) | |
widget-apply((push-button :args nil :value #("Update Packages" 0 15 (face font-lock-keyword-face)) :help-echo "Update all ELPA packages to the latest versions." :action (lambda (&rest ignore) (configuration-layer/update-packages)) :mouse-face highlight :follow-link " | |
" :button-overlay #<overlay from 231 to 248 in *spacemacs*> :from #<marker (moves after insertion) at 231 in *spacemacs*> :to #<marker at 248 in *spacemacs*>) :action nil) | |
widget-apply-action((push-button :args nil :value #("Update Packages" 0 15 (face font-lock-keyword-face)) :help-echo "Update all ELPA packages to the latest versions." :action (lambda (&rest ignore) (configuration-layer/update-packages)) :mouse-face highlight :follow-link " | |
" :button-overlay #<overlay from 231 to 248 in *spacemacs*> :from #<marker (moves after insertion) at 231 in *spacemacs*> :to #<marker at 248 in *spacemacs*>) nil) | |
widget-button-press(243) | |
call-interactively(widget-button-press nil nil) | |
command-execute(widget-button-press) |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment