;LoadPath - 
(if (fboundp 'normal-top-level-add-subdirs-to-load-path)
    (let* ((my-lisp-dir "~/.emacs.d/")
	   (default-directory my-lisp-dir))
      (setq load-path (cons my-lisp-dir load-path))
      (normal-top-level-add-subdirs-to-load-path)))

;Color-theme
(require 'color-theme)
(setq color-theme-is-global t)
(color-theme-initialize)


;Org-Mode:
(require 'org-install)
(add-to-list 'auto-mode-alist '("\\.org$" . org-mode))
(define-key global-map "\C-cl" 'org-store-link)
(define-key global-map "\C-ca" 'org-agenda)
(setq org-log-done t)

;Protocolo defecto Tramp: (ssh)
(setq tramp-default-method "ssh")
;Eliminar mensaje de inicio
(setq inhibit-startup-message t)