Browse Source

[display] fix off-by-1 error in completion item handling

Simon Krajewski 6 years ago
parent
commit
2fd064a704
1 changed files with 1 additions and 1 deletions
  1. 1 1
      src/context/display/displayException.ml

+ 1 - 1
src/context/display/displayException.ml

@@ -73,7 +73,7 @@ let filter_somehow ctx items subject kind po =
 	in
 	in
 	let rec loop items index =
 	let rec loop items index =
 		match items with
 		match items with
-		| _ when DynArray.length ret > !max_completion_items ->
+		| _ when DynArray.length ret >= !max_completion_items ->
 			()
 			()
 		| item :: items ->
 		| item :: items ->
 			let name = String.lowercase (get_filter_name item) in
 			let name = String.lowercase (get_filter_name item) in