On Wed 01 Mar 2017 14:01, Thien-Thi Nguyen <t...@gnu.org> writes: > () Andy Wingo <wi...@pobox.com> > () Thu, 23 Feb 2017 22:06:30 +0100 > > Yeah pk is nice!!!! > > Thumbs up for ‘pk’. Here's the pair of commands i use: > > ;;; pk-unpk.el --- Commands to instrument Scheme code
Neat :) I guess you are not a paredit person? For me in that situation: > ;; (let ((answer (compute-answer))) ...) > ;; ^ > ;; point is here > ;; > ;; Try `M-x pk' then type > ;; > ;; 'answer 'is > ;; > ;; The code then looks like: > ;; > ;; (let ((answer (pk 'answer 'is (compute-answer)))) ...) I would do M-( pk 'answer is and it "just works" (if you have a paredit-infected brain like me). > ;; > ;; `M-x unpk' searches backwards and upwards for a `pk' form and removes > ;; it, or signals error if one cannot be found. Here with point on the open paren in (compute-answer), in paredit M-<Up> does a similar thing. FWIW :) Andy