From 562dd7ccaef9270070d142e9d6cfe8aa164e072e Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Sun, 4 Oct 2020 12:27:20 +0200
Subject: add toot and tweet settings to traewelling checkin

---
 lib/Travelynx/Helper/Traewelling.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'lib/Travelynx/Helper')

diff --git a/lib/Travelynx/Helper/Traewelling.pm b/lib/Travelynx/Helper/Traewelling.pm
index 6d7c367..2a522e5 100644
--- a/lib/Travelynx/Helper/Traewelling.pm
+++ b/lib/Travelynx/Helper/Traewelling.pm
@@ -286,6 +286,8 @@ sub checkin {
 		tripID      => $opt{trip_id},
 		start       => q{} . $opt{dep_eva},
 		destination => q{} . $opt{arr_eva},
+		toot        => $opt{data}{toot} ? \1 : \0,
+		tweet       => $opt{data}{tweet} ? \1 : \0,
 	};
 	my $trip_req = sprintf(
 		"tripID=%s&lineName=%s%%20%s&start=%s",
@@ -321,7 +323,7 @@ sub checkin {
 				);
 				return;
 			}
-			$self->{log}->debug("... success!");
+			$self->{log}->debug( "... success! " . $tx->res->body );
 
 			# As of 2020-10-04, traewelling.de checkins do not yet return
 			# "statusId". The patch is present on the develop branch and waiting
-- 
cgit v1.2.3