diff --git a/tests/unit/geo.tcl b/tests/unit/geo.tcl index 1c7564430..58535bef6 100644 --- a/tests/unit/geo.tcl +++ b/tests/unit/geo.tcl @@ -366,6 +366,13 @@ start_server {tags {"geo"}} { lindex [r geohash points test] 0 } {ezs42e44yx0} + test {GEOHASH with only key as argument} { + r del points + r geoadd points 10 20 a 30 40 b + set result [r geohash points] + assert {$result eq {}} + } + test {GEOPOS simple} { r del points r geoadd points 10 20 a 30 40 b @@ -383,6 +390,13 @@ start_server {tags {"geo"}} { lindex [r geopos points a x b] 1 } {} + test {GEOPOS with only key as argument} { + r del points + r geoadd points 10 20 a 30 40 b + set result [r geopos points] + assert {$result eq {}} + } + test {GEODIST simple & unit} { r del points r geoadd points 13.361389 38.115556 "Palermo" \