;; Antes que nada, quitamos del path el org-mode que viene con emacs, por que es viejo ;; Added by Package.el. This must come before configurations of ;; installed packages. Don't delete this line. If you don't want it, ;; just comment it out by adding a semicolon to the start of the line. ;; You may delete these explanatory comments. (package-initialize) (dolist (val load-path) (if (string-match "lisp\/org" val) (progn (setq org-viejo val) (delete val load-path)))) ;; Se añade la ruta del org-mode nuevo (add-to-list 'load-path (concat user-emacs-directory "el-get/org-mode-maint/lisp/")) ;; Se intenta cargar el org-mode más nuevo. Si falla, vuelve a añadir al path la versión vieja para poder cargar el fichero de configuración (unless (require 'org nil 'noerror) (add-to-list 'load-path org-viejo)) ;; Se carga la configuración pública y la privada (message "Evaluating init-literate.org") (org-babel-load-file (concat user-emacs-directory "init-literate.org")) (message "Evaluating private-literate.org") (org-babel-load-file (concat user-emacs-directory "private-literate.org")) (custom-set-variables ;; custom-set-variables was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. '(custom-safe-themes (quote ("71ecffba18621354a1be303687f33b84788e13f40141580fa81e7840752d31bf" default))) (put 'upcase-region 'disabled nil) (custom-set-faces ;; custom-set-faces was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. '(default ((t (:family "DejaVu Sans Mono" :foundry "unknown" :slant normal :weight normal :height 107 :width normal)))))