   [existing new]
   (reduce replace-existing existing new))
 
-(defn select-op-options
-  "Given an options map, return an options map with only the operational
-  options remaining."
-  [options]
-  (select-keys options operational-options))
-
 ;;
 ;; # Configure one map
 ;;

                          new-options))
  ([new-options]
   (config-set-options! new-options
                        (str "repl or api call " (inc-explained-sequence))))
  ([new-options doc-str] (config-set-options! new-options doc-str nil)))

;;
;; # Options Validation Functions

  #?(:clj (some is-repl-stack-element (current-stack-trace))
     :cljs nil))

(defn select-op-options
  "Given an options map, return an options map with only the operational
  options remaining."
  [options]
  (select-keys options operational-options))

;;
;; End "detect in a REPL" code

