Vim gd case, fix 672

yi-editor · Oct 25, 2014 · 6ae986e · 6ae986e
1 parent 2369518
commit 6ae986e
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/yi/src/library/Yi/Modes.hs b/yi/src/library/Yi/Modes.hs
@@ -70,11 +70,16 @@ fundamentalMode = emptyMode
   , modeGotoDeclaration = do
        currentPoint <- pointB
        currentWord <- readCurrentWordB
+       currentWordBeginningPoint <- regionStart <$> regionOfB unitWord
        _ <- gotoLn 0
        word <- return $ makeSimpleSearch currentWord
        searchResults <- regexB Forward word
        case searchResults of
-           (declarationRegion : _) -> moveTo $ regionStart declarationRegion
+           (declarationRegion : _) -> do
+               searchPoint <- return $ regionStart declarationRegion
+               if(currentWordBeginningPoint /= searchPoint)
+               then moveTo searchPoint
+               else moveTo currentPoint
            [] -> moveTo currentPoint
   }