diff --git a/Changelog b/Changelog
index 650c6abc60c527aac4d1f260f2e03bcb58339090..720b807d05a990691ae1e56723ea413a41b880a5 100644
--- a/Changelog
+++ b/Changelog
@@ -1,3 +1,7 @@
+Travel::Status::DE::DeutscheBahn 4.09 - Mon Apr 10 2023
+
+    * HAFAS->new: Add geoSearch option (search stops by coordinates)
+
 Travel::Status::DE::DeutscheBahn 4.08 - Sun Feb 12 2023
 
     * Journey: Correctly report route_end / origin in arrivals mode
diff --git a/bin/hafas-m b/bin/hafas-m
index 858b0aeb15b96b654ec3d1779add219f53421e22..2e48a903ed474be66aee6bad29e12d522f6f623e 100755
--- a/bin/hafas-m
+++ b/bin/hafas-m
@@ -3,7 +3,7 @@ use strict;
 use warnings;
 use 5.014;
 
-our $VERSION = '4.08';
+our $VERSION = '4.09';
 
 use utf8;
 use DateTime;
@@ -350,7 +350,7 @@ B<hafas-m> [B<-d> I<date>] [B<-t> I<time>] [B<-m> I<motlist>]
 
 =head1 VERSION
 
-version 4.08
+version 4.09
 
 =head1 DESCRIPTION
 
diff --git a/lib/Travel/Status/DE/DeutscheBahn.pm b/lib/Travel/Status/DE/DeutscheBahn.pm
index dbacccb837960cff738306502ef4adfc73b8f335..76a7fa2a5e465bee101293349163110820f889d5 100644
--- a/lib/Travel/Status/DE/DeutscheBahn.pm
+++ b/lib/Travel/Status/DE/DeutscheBahn.pm
@@ -6,7 +6,7 @@ use 5.014;
 
 use parent 'Travel::Status::DE::HAFAS';
 
-our $VERSION = '4.08';
+our $VERSION = '4.09';
 
 sub new {
 	my ( $class, %opt ) = @_;
@@ -49,7 +49,7 @@ monitor operated by Deutsche Bahn
 
 =head1 VERSION
 
-version 4.08
+version 4.09
 
 =head1 DESCRIPTION
 
diff --git a/lib/Travel/Status/DE/HAFAS.pm b/lib/Travel/Status/DE/HAFAS.pm
index 0ea88591032b7eb66d40b95f10f35e4d41f0b0d3..1250857973ffa6fbf8b790349293e9dcd6d8fe77 100644
--- a/lib/Travel/Status/DE/HAFAS.pm
+++ b/lib/Travel/Status/DE/HAFAS.pm
@@ -22,7 +22,7 @@ use Travel::Status::DE::HAFAS::Journey;
 use Travel::Status::DE::HAFAS::StopFinder;
 use Travel::Status::DE::HAFAS::Stop;
 
-our $VERSION = '4.08';
+our $VERSION = '4.09';
 
 # {{{ Endpoint Definition
 
@@ -865,7 +865,7 @@ monitors
 
 =head1 VERSION
 
-version 4.08
+version 4.09
 
 =head1 DESCRIPTION
 
diff --git a/lib/Travel/Status/DE/HAFAS/Journey.pm b/lib/Travel/Status/DE/HAFAS/Journey.pm
index b8a8f865467c51e5876845aeba3071504c7eb65f..cd209c0b645e82318baf5d3463f07851e74ba6ca 100644
--- a/lib/Travel/Status/DE/HAFAS/Journey.pm
+++ b/lib/Travel/Status/DE/HAFAS/Journey.pm
@@ -10,7 +10,7 @@ no if $] >= 5.018, warnings => 'experimental::smartmatch';
 
 use parent 'Class::Accessor';
 
-our $VERSION = '4.08';
+our $VERSION = '4.09';
 
 Travel::Status::DE::HAFAS::Journey->mk_ro_accessors(
 	qw(datetime sched_datetime rt_datetime
@@ -460,7 +460,7 @@ journey received by Travel::Status::DE::HAFAS
 
 =head1 VERSION
 
-version 4.08
+version 4.09
 
 =head1 DESCRIPTION
 
diff --git a/lib/Travel/Status/DE/HAFAS/Message.pm b/lib/Travel/Status/DE/HAFAS/Message.pm
index 499cca851c8d8b9fdd19f4a6f3a8c6d51f16edae..91d0106e6306ad6255d8296139a00cf7a3842085 100644
--- a/lib/Travel/Status/DE/HAFAS/Message.pm
+++ b/lib/Travel/Status/DE/HAFAS/Message.pm
@@ -6,7 +6,7 @@ use 5.014;
 
 use parent 'Class::Accessor';
 
-our $VERSION = '4.08';
+our $VERSION = '4.09';
 
 Travel::Status::DE::HAFAS::Message->mk_ro_accessors(
 	qw(short text code prio is_him ref_count));
@@ -45,7 +45,7 @@ Travel::Status::DE::HAFAS::Message - An arrival/departure-related message.
 
 =head1 VERSION
 
-version 4.08
+version 4.09
 
 =head1 DESCRIPTION
 
diff --git a/lib/Travel/Status/DE/HAFAS/Polyline.pm b/lib/Travel/Status/DE/HAFAS/Polyline.pm
index 96df4f7aa65ef138daf2add80ab0b4b1913af4bc..e70e2e5d6a08ac19bbbfda6e7eaf48d32fb01e77 100644
--- a/lib/Travel/Status/DE/HAFAS/Polyline.pm
+++ b/lib/Travel/Status/DE/HAFAS/Polyline.pm
@@ -16,7 +16,7 @@ use 5.014;
 use parent 'Exporter';
 our @EXPORT_OK = qw(decode_polyline);
 
-our $VERSION = '4.08';
+our $VERSION = '4.09';
 
 # Translated this php script
 # <http://unitstep.net/blog/2008/08/02/decoding-google-maps-encoded-polylines-using-php/>
diff --git a/lib/Travel/Status/DE/HAFAS/Stop.pm b/lib/Travel/Status/DE/HAFAS/Stop.pm
index 441c2a0f74d307cc4ae0fa977cf0e2e30dca7568..1f165509de76917c6c27f23c869902ac9d03bed0 100644
--- a/lib/Travel/Status/DE/HAFAS/Stop.pm
+++ b/lib/Travel/Status/DE/HAFAS/Stop.pm
@@ -8,7 +8,7 @@ use 5.014;
 
 use parent 'Class::Accessor';
 
-our $VERSION = '4.08';
+our $VERSION = '4.09';
 
 Travel::Status::DE::HAFAS::Stop->mk_ro_accessors(
 	qw(eva name lat lon distance_m weight));
@@ -56,7 +56,7 @@ Travel::Status::DE::HAFAS::Stop - Information about a HAFAS stop.
 
 =head1 VERSION
 
-version 4.08
+version 4.09
 
 =head1 DESCRIPTION
 
diff --git a/lib/Travel/Status/DE/HAFAS/StopFinder.pm b/lib/Travel/Status/DE/HAFAS/StopFinder.pm
index 36beb1ccfad4056931ceb7ce34f183497cd8460e..c2da4d71d3684e3ba159ca57bde1e58ba0d4fcdb 100644
--- a/lib/Travel/Status/DE/HAFAS/StopFinder.pm
+++ b/lib/Travel/Status/DE/HAFAS/StopFinder.pm
@@ -12,7 +12,7 @@ use Encode qw(decode);
 use JSON;
 use LWP::UserAgent;
 
-our $VERSION = '4.08';
+our $VERSION = '4.09';
 
 # {{{ Constructors
 
@@ -182,7 +182,7 @@ finder services
 
 =head1 VERSION
 
-version 4.08
+version 4.09
 
 =head1 DESCRIPTION