diff --git a/.emacs.d/lisp/init-helm.el b/.emacs.d/lisp/init-helm.el
index b63b00e5..7c297db3 100644
--- a/.emacs.d/lisp/init-helm.el
+++ b/.emacs.d/lisp/init-helm.el
@@ -240,10 +240,9 @@ Requires `call-process-to-string' from `functions'."
   (setq helm-locate-recursive-dirs-command "find %s -type d -regex .*%s.*$"))
 
 ;;; Convenience.
-(defun helm-toggle-visible-mark-backwards ()
-  (interactive)
-  (helm-toggle-visible-mark)
-  (helm-previous-line 2))
+(defun helm-toggle-visible-mark-backwards (arg)
+  (interactive "p")
+  (helm-toggle-visible-mark (- arg)))
 (define-key helm-map (kbd "S-SPC") 'helm-toggle-visible-mark-backwards)
 
 (provide 'init-helm)