   "Exchange string-1 and string-2 interactively.
 The user is prompted at each instance like query-replace. Exchanging
 happens within a region if one is selected."
- (interactive
+  (interactive
    (let ((common
 	  (query-replace-read-args
 	   (concat "Query replace"

                              (if (match-string 1) string-2 string-1))
   t t delimited nil nil start end))

;; Swoop
;; https://github.com/ShingoFukuyama/emacs-swoop
(req-package swoop
  :config
  (progn
    (bind-keys
     :map modi-mode-map
     ("M-i" . swoop)
     ("M-I" . swoop-multi)
     ("M-o" . swoop-pcre-regexp))
    ;; Transition
    ;; isearch     > press [C-o] > swoop
    (define-key isearch-mode-map (kbd "C-o") 'swoop-from-isearch)
    ;; swoop       > press [C-o] > swoop-multi
    (define-key swoop-map (kbd "C-o")        'swoop-multi-from-swoop)
    ;; Resume
    ;; C-u M-x swoop : Use last used query
    ;; Swoop Edit Mode
    ;; During swoop, press [C-c C-e]
    ;; You can edit synchronously
    ))

;; Source: https://github.com/purcell/emacs.d/blob/master/lisp/init-isearch.el

;; Time-stamp: <2015-01-20 14:17:44 kmodi>

;; Search

