Update insert-activate-mark functionality to use built in mechanics

`push-mark' already has the functionality to conditionally enable the
mark so we should use that instead.

meow-command.el

@@ -68,7 +68,7 @@ The direction of selection is MARK -> POS."
       (message "Mark set"))
   nil)
 
-(defun meow--select (selection &optional backward)
+(defun meow--select (selection &optional backward keep-disabled)
   "Mark the SELECTION."
   (let* ((old-sel-type (meow--selection-type))
         (sel-type (car selection))
@@ -84,7 +84,7 @@ The direction of selection is MARK -> POS."
       (cond
        ((null old-sel-type)
         (goto-char to-go)
-        (push-mark to-mark t t))
+        (push-mark to-mark t (not keep-disabled)))
        (t
         (goto-char to-go)
         (set-mark to-mark)))

meow-core.el

@@ -46,9 +46,7 @@
                (not (= (point) meow--insert-pos)))
       (thread-first
         (meow--make-selection '(select . transient) meow--insert-pos (point))
-        (meow--select))
-      (when (not meow--insert-activate-mark)
-        (deactivate-mark)))
+        (meow--select nil (not meow--insert-activate-mark))))
     (run-hooks 'meow-insert-exit-hook)
     (setq-local meow--insert-pos nil
                 meow--insert-activate-mark nil)))