X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/e3dfb26b904edb4645fee4b43e93a6d54e2e8041..dc8c9ea777e72a89ca646820a85e6a5ce4cfae48:/IkiWiki/Plugin/emailauth.pm

diff --git a/IkiWiki/Plugin/emailauth.pm b/IkiWiki/Plugin/emailauth.pm
index 9c595dc86..becf40ca5 100644
--- a/IkiWiki/Plugin/emailauth.pm
+++ b/IkiWiki/Plugin/emailauth.pm
@@ -76,7 +76,7 @@ sub email_auth ($$$$) {
 	$template->param(
 		wikiname => $config{wikiname},
 		# Intentionally using short field names to keep link short.
-		authurl => IkiWiki::cgiurl_abs(
+		authurl => IkiWiki::cgiurl_abs_samescheme(
 			'e' => $email,
 			'v' => $token,
 		),
@@ -95,7 +95,7 @@ sub email_auth ($$$$) {
 			.">",
 		Subject => "$config{wikiname} login | $shorturl",
 		Message => $template->output,
-	) or error(gettext("Failed to send mail"));
+	) or error(sprintf(gettext("Failed to send mail: %s"), $Mail::Sendmail::error));
 
 	$infodisplayer->(gettext("You have been sent an email, with a link you can open to complete the login process."));
 }