From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Lachlan Deck Newsgroups: gmane.emacs.help Subject: dolist require help Date: Fri, 30 Sep 2011 09:10:45 +1000 Message-ID: <3516DA17-6376-4850-988D-12917DDDE518@gmail.com> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 (Apple Message framework v1244.3) Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: quoted-printable X-Trace: dough.gmane.org 1317337866 32558 80.91.229.12 (29 Sep 2011 23:11:06 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Thu, 29 Sep 2011 23:11:06 +0000 (UTC) To: help-gnu-emacs@gnu.org Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Fri Sep 30 01:10:59 2011 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([140.186.70.17]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1R9Pkp-00079Y-58 for geh-help-gnu-emacs@m.gmane.org; Fri, 30 Sep 2011 01:10:59 +0200 Original-Received: from localhost ([::1]:42956 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1R9Pkn-0002nX-Sc for geh-help-gnu-emacs@m.gmane.org; Thu, 29 Sep 2011 19:10:57 -0400 Original-Received: from eggs.gnu.org ([140.186.70.92]:60556) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1R9Pki-0002nP-KP for help-gnu-emacs@gnu.org; Thu, 29 Sep 2011 19:10:53 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1R9Pkh-00022P-K7 for help-gnu-emacs@gnu.org; Thu, 29 Sep 2011 19:10:52 -0400 Original-Received: from mail-yi0-f41.google.com ([209.85.218.41]:44884) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1R9Pkh-00022K-CA for help-gnu-emacs@gnu.org; Thu, 29 Sep 2011 19:10:51 -0400 Original-Received: by yia25 with SMTP id 25so1229829yia.0 for ; Thu, 29 Sep 2011 16:10:51 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=gamma; h=from:content-type:content-transfer-encoding:subject:date:message-id :to:mime-version:x-mailer; bh=2LHCzvn0fKkEJwp7pzuqDrr9hFcfwhumizaZNlcVGRo=; b=q6/pqaJ1Bc2mJb+9gkvB2QaoLx4AZJ+oSkuGL5xcfDDgn4JwsHU7FfFmoBtzvqoi+K B/d05DwX4cn9z6VnblyNgabQG6I0uuU+93BaWThufivBzJcSZuD6k9ODGbkZNMTQlbTH n4CM+2HbSlha0sWy2CvxgJ4WAat4abH/pr9x0= Original-Received: by 10.100.59.19 with SMTP id h19mr8143748ana.38.1317337851013; Thu, 29 Sep 2011 16:10:51 -0700 (PDT) Original-Received: from [10.38.35.196] (cpmon.mq.edu.au. [137.111.13.200]) by mx.google.com with ESMTPS id h20sm8832443ani.16.2011.09.29.16.10.48 (version=TLSv1/SSLv3 cipher=OTHER); Thu, 29 Sep 2011 16:10:50 -0700 (PDT) X-Mailer: Apple Mail (2.1244.3) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-Received-From: 209.85.218.41 X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:82379 Archived-At: 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) = = = =20 (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(#> 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") <...>=