overtone / emacs-live

M-x start-hacking
http://overtone.github.com/emacs-live/
Other
1.51k stars 242 forks source link

subrepos not downloaded #172

Open humanitiesNerd opened 10 years ago

humanitiesNerd commented 10 years ago

I am installing a brand new Live and here we are

Debugger entered--Lisp error: (file-error "Cannot open load file" "auto-compile")
  require(auto-compile)
  eval-buffer(#<buffer  *load*-195994> nil "/home/me/.emacs.d/packs/dev/foundation-pack/config/auto-compile-conf.el" nil t)  ; Reading at buffer position 88
  load-with-code-conversion("/home/me/.emacs.d/packs/dev/foundation-pack/config/auto-compile-conf.el" "/home/me/.emacs.d/packs/dev/foundation-pack/config/auto-compile-conf.el" nil nil)
  load("/home/me/.emacs.d/packs/dev/foundation-pack/config/auto-compile-conf.el" nil nil t)
  load-file("/home/me/.emacs.d/packs/dev/foundation-pack/config/auto-compile-conf.el")
  (let* ((config-dir (live-pack-config-dir))) (load-file (concat config-dir f-name)))
  live-load-config-file("auto-compile-conf.el")
  (progn (live-load-config-file "auto-compile-conf.el"))
  (if (not (or (eq (quote ms-dos) system-type) (eq (quote windows-nt) system-type))) (progn (live-load-config-file "auto-compile-conf.el")))
  eval-buffer(#<buffer  *load*-685333> nil "/home/me/.emacs.d/packs/dev/foundation-pack/init.el" nil t)  ; Reading at buffer position 136
  load-with-code-conversion("/home/me/.emacs.d/packs/dev/foundation-pack/init.el" "/home/me/.emacs.d/packs/dev/foundation-pack/init.el" nil nil)
  load("/home/me/.emacs.d/packs/dev/foundation-pack/init.el" nil nil t)
  load-file("/home/me/.emacs.d/packs/dev/foundation-pack/init.el")
  (if (file-exists-p pack-init) (load-file pack-init))
  (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))

live-load-pack("/home/me/.emacs.d/packs/dev/foundation-pack/")
  (lambda (pack-dir) (live-load-pack pack-dir))

("/home/me/.emacs.d/packs/dev/foundation-pack/")

  mapc((lambda (pack-dir) (live-load-pack pack-dir)) 
("/home/me/.emacs.d/packs/dev/foundation-pack/" 
"/home/me/.emacs.d/packs/dev/colour-pack/" 
"/home/me/.emacs.d/packs/dev/lang-pack/" 
"/home/me/.emacs.d/packs/dev/power-pack/" 
"/home/me/.emacs.d/packs/dev/git-pack/" 
"/home/me/.emacs.d/packs/dev/org-pack/" 
"/home/me/.emacs.d/packs/dev/clojure-pack/" 
"/home/me/.emacs.d/packs/dev/bindings-pack/"))

  (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")))))
  (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"))))))
  eval-buffer(#<buffer  *load*> nil "/home/me/.emacs.d/init.el" nil t)  ; Reading at buffer position 8318
  load-with-code-conversion("/home/me/.emacs.d/init.el" "/home/me/.emacs.d/init.el" t t)
  load("/home/me/.emacs.d/init" t t)
  #[0 "\205\262

It seems that packs/dev/foundation-pack/vendor/submodules/auto-compile/ is empty

So are ALL the /dev/foundation-pack/vendor/submodules

That's because they all are submodule repos and they won't be cloned unless git is explicitly instructed to do so , as I learned from this enlightening answer (I also solved my prob thanks to that answer) http://stackoverflow.com/questions/3796927/how-to-git-clone-including-submodules

In a freshly installed repo (we install repos nowadays) the git cloning function in the installation file should probably be

function git_clone {
     echo ""
     echo $(tput setaf 2)"--> Cloning Emacs Live..."$(tput sgr0)
     echo ""
    git clone --recursive https://github.com/overtone/emacs-live.git $tmp_dir/overtone-emacs-live
}

rather than what it is

function git_clone {
     echo ""
     echo $(tput setaf 2)"--> Cloning Emacs Live..."$(tput sgr0)
     echo ""
    git clone https://github.com/overtone/emacs-live.git $tmp_dir/overtone-emacs-live
}

Hope this helps Saludos