visualstar starts a new search

Fixes #254

Author: nosami

XSVim.Tests/MiscTests.fs

@@ -173,6 +173,10 @@ module ``Miscellaneous tests`` =
     let ``* finds next word at caret``() =
         assertText "a$bc abc" "*" "abc a$bc"
 
+    [<Test>]
+    let ``n finds next match``() =
+        assertText "a$bc abc cba abc" "*n" "abc abc cba a$bc"
+
     [<Test>]
     let ``* finds next word when on last word char``() =
         assertText "abc$ abc" "*" "abc a$bc"

XSVim/Properties/AssemblyInfo.fs

@@ -5,7 +5,7 @@ open System.Runtime.CompilerServices
 [<AutoOpen>]
 module AddinVersion =
     [<Literal>]
-    let version = "0.65.1.80"
+    let version = "0.65.2"
 
 [<assembly: AssemblyTitle("XSVim")>]
 // The assembly version has the format {Major}.{Minor}.{Build}.{VSMacVersion}

XSVim/XSVim.fs

@@ -1174,7 +1174,7 @@ module Vim =
                                 let m = matches |> Seq.head
                                 m.Index
                         editor.CaretOffset <- offset
-                        vimState
+                        { vimState with lastSearch = Some (Jump (ToSearch word)) }
                     | None ->
                         processCommands config 1 vimState (runOnce Move WordForwards) isInitial
                 | Star Before ->
@@ -1196,7 +1196,7 @@ module Vim =
                                 let m = matches |> Seq.last
                                 m.Index
                         editor.CaretOffset <- offset
-                        vimState
+                        { vimState with lastSearch = Some (Jump (ToSearchBackwards word)) }
                     | None -> vimState
                 | InsertChar c ->
                     match vimState.mode with