 	   (['rex ['error rsn]]
 	    (message "Duplicated code detection failed: %s" rsn))
 	   (['rex ['ok result]]
-	    (message "Duplicated code detection finished!")))))))
+	    (message "Duplicated code detection finished!")))))))))
 
 
 (defun erl-refactor-duplicated-code-in-dirs(node mintokens minclones)

	(start-line-no (line-no-pos start))
	(start-col-no  (current-column-pos start))
	(end-line-no   (line-no-pos end))
	(end-col-no    (current-column-pos end)))     
    (erl-spawn
      (erl-send-rpc node 'wrangler_distel 'expression_search
		    (list current-file-name start-line-no start-col-no end-line-no end-col-no))

	   (['rex ['error rsn]]
	    (message "Duplicated code detection failed: %s" rsn))
	   (['rex ['ok result]]
	    (message "Duplicated code detection finished!")))))))))

(defun erl-refactor-expression-search(node start end)
  "Search an user-selected expression or expression sequence in the current buffer."
