Wilfred/replace-nested-list.el

Last active December 15, 2015 05:19

Star (0) You must be signed in to star a gist
Fork (0) You must be signed in to fork a gist

Select an option

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/Wilfred/5208113.js"></script>
Save Wilfred/5208113 to your computer and use it in GitHub Desktop.

Download ZIP

Replace all occurrences of atom FROM with TO in an arbitrarily nested list.

Raw

replace-nested-list.el

 (require 'dash)
 (defun replace-nested-list (from to list)
   "Replace all occurrences of atom FROM with TO in an arbitrarily nested LIST."
   (--map
    (cond
     ((consp it) (in-ns--replace-nested-list from to it))
     ((eq it from) to)
     ('t it))
    list))

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment