Skip to content

Instantly share code, notes, and snippets.

@ajchemist

ajchemist/cycle.el

Created June 25, 2014 15:17
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save ajchemist/9c40c1046413c48fe459 to your computer and use it in GitHub Desktop.
Save ajchemist/9c40c1046413c48fe459 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
cycle.el
(setq xcycle '#1=(("p1" . "t1") ("p2" . "t2") . #1#))
(cadr (member (assoc-string "p2" xcycle) xcycle))
(setq xcycle '#1=("p1" "t1" "p2" "t2" . #1#))
(cddr (member "p2" xcycle))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment