meow-search-forward and meow-search-backward

[Inc0n]

Using n (meow-search) and - (negative-argument) to reverse the direction, to search forward and backward is unfamiliar with me, therefore, I wrote the following two functions to search in the two fixed directions.

(defun meow-search-forward (arg)
  (interactive "p")
  (meow-search
   (if (meow--direction-backward-p)
       arg
     '-)))

(defun meow-search-backward (arg)
  (interactive "p")
  (meow-search
   (if (meow--direction-backward-p)
       '-
     arg)))