 	      (kill-buffer (get-file-buffer-1 uf)))
 	    (setq unopened-files nil)
 	    (setq refactor-mode nil)
-	    (message "Refactoring aborted."))))))
-  (setq composite_refac 'false))
+	    (message "Refactoring aborted.")))))))
+  
       
 (add-hook 'ediff-quit-hook 'my-ediff-qh)
 

(defun abort-changes()
  "abort the refactoring results"
  (erl-spawn
    (erl-send-rpc wrangler-erl-node 'wrangler_preview_server 'abort (list composite_refac))
    (erl-receive ()
	((['rex ['badrpc rsn]]
	  (setq refactor-mode nil)

  (dolist (uf unopened-files)
    (kill-buffer (get-file-buffer-1 uf)))
  (setq unopened-files nil)
  candidates-not-to-change)  
 

(defun apply-composite-refac(callback-module-name) 
  "Apply a composite refactoring defined by behaviour gen_composite_refac"
  (interactive (list (read-string "Refactoring Callback module name: ")))
  (let* ((buffer (current-buffer))
        (current-file-name (buffer-file-name))
        (line-no (current-line-no))
