On Mar 13, 8:13 am, Saikat Chakrabarti <[email protected]> wrote:
> Is it possible to get the symbol used to describe given a view
> object?  I think I want the opposite behavior of find-view.

Here's the inverse function:

(defun get-view-name (view)
  (maphash
    (lambda (name obj)
      (when (eq obj view)
        (return-from get-view-name name)))
    WEBLOCKS::*VIEWS*))
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups 
"weblocks" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to 
[email protected]
For more options, visit this group at 
http://groups.google.com/group/weblocks?hl=en
-~----------~----~----~----~------~----~------~--~---

Reply via email to