From mboxrd@z Thu Jan  1 00:00:00 1970
From: "tenspd137 ." <dcday137@gmail.com>
Subject: Re: Dynamically creating capture mode templates (solved)
Date: Fri, 9 Oct 2015 22:34:19 -0600
Message-ID: <CAB=m8wJ+FtMumFDYa4i10DmmmJsPNb0q3A8C4Cd1VYjLOABSdg@mail.gmail.com>
Mime-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:4830:134:3::10]:38898)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <dcday137@gmail.com>) id 1ZklrQ-0000kU-NW
	for emacs-orgmode@gnu.org; Sat, 10 Oct 2015 00:34:21 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <dcday137@gmail.com>) id 1ZklrP-0005SL-U6
	for emacs-orgmode@gnu.org; Sat, 10 Oct 2015 00:34:20 -0400
Received: from mail-ig0-x22c.google.com ([2607:f8b0:4001:c05::22c]:35259)
	by eggs.gnu.org with esmtp (Exim 4.71)
	(envelope-from <dcday137@gmail.com>) id 1ZklrP-0005S8-Qz
	for emacs-orgmode@gnu.org; Sat, 10 Oct 2015 00:34:19 -0400
Received: by igbkq10 with SMTP id kq10so47580907igb.0
	for <emacs-orgmode@gnu.org>; Fri, 09 Oct 2015 21:34:19 -0700 (PDT)
List-Id: "General discussions about Org-mode." <emacs-orgmode.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/emacs-orgmode>
List-Post: <mailto:emacs-orgmode@gnu.org>
List-Help: <mailto:emacs-orgmode-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=subscribe>
Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
To: emacs-orgmode@gnu.org

Needed to use backquotes correctly:

(setq products '("Firebird" "Ion"))


(dolist (product products)
  (setq org-capture-templates
        (append org-capture-templates `( (,(substring product 0 1) ,product)
                                        (,(concat (substring product 0
1) "t" ) "Todo" entry (file+headline (concat org-directory
"/default.org") ,product) "* TODO %?" )     ))))

Again - I hope this helps someone else in the future.

Thanks!



On Fri, Oct 9, 2015 at 12:34 PM, tenspd137 . <dcday137@gmail.com> wrote:
> Hi all -
>
> I was hoping someone could help me figure this out.  I have the
> following in a .el file I am loading to create keys for my projects:
>
> (setq projects '("Aa" "Bb" "Cc" "Dd")
>
> (let (firstLetter)
>   (dolist (project projects firstLetter)
>     (setq firstLetter (substring project 0 1))
>     (message "%s" firstLetter)
>     (setq org-capture-templates
>           (append org-capture-templates
>                   '((firstLetter project)
>                     ((concat firstLetter "t") "Todo" entry
> (file+headline (concat org-directory "/default.org") project) "* TODO
> %?"))))))
>
> C-n (to activate capture mode)
>
> org-mks: Wrong type argument: sequencep, firstLetter
>
>
> but in the messages window, it prints the firstLetter variable -
> shouldn't firstLetter be a string or char?
>
> Anyway, I can't seem to get this to work - could anyone give me some
> insight as to what I am missing?
>
> Thanks!