Fall back to one-arg require if searching fails.

This is necessary during compilation, when both `load-file-name` and `buffer-file-name` are nil. Fixes issue #41.
This commit is contained in:
Greg Pfeil 2012-03-16 17:27:17 -06:00
parent 193d29ae89
commit 48c0f1345c
1 changed files with 8 additions and 6 deletions

View File

@ -10,12 +10,14 @@
;;; 2. Load this file
;;; 3. M-x color-theme-solarized-[dark|light]
(require 'solarized-definitions
(let* ((reqname (concat (file-name-directory (or load-file-name
buffer-file-name))
"solarized-definitions.el"))
(compreqname (concat reqname "c")))
(if (file-exists-p compreqname) compreqname reqname)))
(let ((current-file-name (or load-file-name buffer-file-name)))
(if current-file-name
(let* ((reqname (concat (file-name-directory current-file-name)
"solarized-definitions.el"))
(compreqname (concat reqname "c")))
(require 'solarized-definitions
(if (file-exists-p compreqname) compreqname reqname)))
(require 'solarized-definitions)))
(eval-when-compile
(require 'color-theme))