Skip to content

Instantly share code, notes, and snippets.

@donaldh

donaldh/gist:758ead0d49e6ce500fb48d206d0d012d

Created November 1, 2016 21:36
Show Gist options
  • Save donaldh/758ead0d49e6ce500fb48d206d0d012d to your computer and use it in GitHub Desktop.
Save donaldh/758ead0d49e6ce500fb48d206d0d012d to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
(require 'json)
(with-current-buffer "*HTTP Response*"
(save-excursion
(goto-char (point-min))
(car (nth 1 (car (json-read))))))
@donaldh
Copy link
Author

donaldh commented Nov 1, 2016 •
edited
Loading 

:simulation := (if (boundp 'virl-simulation-id) virl-simulation-id (set (make-local-variable 'virl-simulation-id) (with-current-buffer "*HTTP Response*" (save-excursion (goto-char (point-min)) (car (nth 1 (car (json-read))))))))

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