Recentering window only if the command executed successfully instead of doing recentering in the 'preview'.

Author: jcs090218

goto-line-preview.el

@@ -83,7 +83,8 @@ LINE-NUM : Target line number to navigate to."
         (let ((goto-line-preview-prev-buffer (buffer-name))
               (goto-line-preview-prev-line-num (line-number-at-pos)))
           (setq jumped (read-number "Goto line: ")))
-      (unless jumped
+      (if jumped
+          (call-interactively #'recenter)
         (set-window-point window window-point)))))
 
 ;;;###autoload