From: Lachlan Deck <lachlan.deck@gmail.com>
To: help-gnu-emacs@gnu.org
Subject: dolist require help
Date: Fri, 30 Sep 2011 09:10:45 +1000 [thread overview]
Message-ID: <3516DA17-6376-4850-988D-12917DDDE518@gmail.com> (raw)
Hi there,
I'm trying to auto-require some custom provided stuff -- a list of files containing various settings -- and can't quite make it work.
Any ideas what I'm doing wrong?
(defvar my-el-dir (file-name-directory load-file-name))
(defvar my-custom-dir (concat my-el-dir "custom/"))
(add-to-list 'load-path my-custom-dir)
(require 'my-package-autoloads)
(require 'my-el-get-autoloads)
;; this doesn't work (strack trace below)
(dolist (setting-file (file-expand-wildcards (concat my-custom-dir "*-settings.el")))
(progn (print (concat "---> loading " (file-name-sans-extension (file-name-nondirectory setting-file)))))
(require (make-symbol (file-name-sans-extension (file-name-nondirectory setting-file)))))
;; this does work
(require 'my-ecb-settings)
<..>
Lachlan Deck
lachlan.deck@gmail.com
Debugger entered--Lisp error: (error "Required feature `my-ecb-settings' was not provided")
require(my-ecb-settings)
(while --cl-dolist-temp-- (setq setting-file (car --cl-dolist-temp--)) (progn (print (concat "---> loading " (file-name-sans-extension (file-name-nondirectory setting-file))))) (require (make-symbol ($
(let ((--cl-dolist-temp-- (file-expand-wildcards (concat my-custom-dir "*-settings.el"))) setting-file) (while --cl-dolist-temp-- (setq setting-file (car --cl-dolist-temp--)) (progn (print (concat "--$
(catch (quote --cl-block-nil--) (let ((--cl-dolist-temp-- (file-expand-wildcards (concat my-custom-dir "*-settings.el"))) setting-file) (while --cl-dolist-temp-- (setq setting-file (car --cl-dolist-te$
(cl-block-wrapper (catch (quote --cl-block-nil--) (let ((--cl-dolist-temp-- (file-expand-wildcards (concat my-custom-dir "*-settings.el"))) setting-file) (while --cl-dolist-temp-- (setq setting-file ($
(block nil (let ((--cl-dolist-temp-- (file-expand-wildcards (concat my-custom-dir "*-settings.el"))) setting-file) (while --cl-dolist-temp-- (setq setting-file (car --cl-dolist-temp--)) (progn (print $
(dolist (setting-file (file-expand-wildcards (concat my-custom-dir "*-settings.el"))) (progn (print (concat "---> loading " (file-name-sans-extension (file-name-nondirectory setting-file))))) (require$
eval-buffer(#<buffer *load*<3>> nil "/Users/ldeck/.emacs.d/ldeck/my.el" nil t) ; Reading at buffer position 562
load-with-code-conversion("/Users/ldeck/.emacs.d/ldeck/my.el" "/Users/ldeck/.emacs.d/ldeck/my.el" nil nil)
load("my.el")
<...>
next reply other threads:[~2011-09-29 23:10 UTC|newest]
Thread overview: 2+ messages / expand[flat|nested] mbox.gz Atom feed top
2011-09-29 23:10 Lachlan Deck [this message]
2011-09-29 23:33 ` dolist require help Lachlan Deck
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=3516DA17-6376-4850-988D-12917DDDE518@gmail.com \
--to=lachlan.deck@gmail.com \
--cc=help-gnu-emacs@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).