From james at agentultra.com  Thu Mar  5 17:57:59 2009
From: james at agentultra.com (James King)
Date: Thu, 5 Mar 2009 09:57:59 -0800
Subject: [lispy-devel] search-map
Message-ID: <d4c34ddb0903050957k77647d9aq69c03cdc562597a1@mail.gmail.com>

I wrote a quick function for searching lispy that I thought might be useful:

(defun search-map (term)
    (let ((module-names (loop for module in (list-map)
                                                 (collecting (string (name
module)))))
      (loop for module in module-names
          if (search (string-upcase term) module)
          collecting module)))

Thanks for lispy. Quite handy, look forward to more libraries in the
official/experimental maps. :)
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/lispy-devel/attachments/20090305/de6b7c41/attachment.html>