         new-tag-num (mod (round (perturb-with-gaussian-noise 
                                   uniform-mutation-tag-gaussian-standard-deviation tag-num))
                          @global-tag-limit)
-        new-instr (symbol (apply str (interpose  "_" (concat (butlast tagparts) (list (str new-tag-num))))))]
+        new-instr (symbol (apply str (interpose "_" (concat (butlast tagparts) 
+                                                            (list (str new-tag-num))))))]
     (assoc instr-map :instruction new-instr)))
 
 (defn uniform-mutation

           :is-random-replacement
           (if use-child false true)
      )))

;; @@

(ns clojush.pushgp.genetic-operators
  (:use [clojush util random individual globals interpreter translate pushstate]
        clojush.instructions.tag
