From: Badlop <badlop@process-one.net>
Date: Fri, 21 Dec 2018 14:32:23 +0000 (+0100)
Subject: Add no-store hint to CAPTCHA challenge stanzas (#2730)
X-Git-Tag: 19.02~81
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=1246a7a50fc9b87e15a1bc4f76b262b4a469356a;p=ejabberd

Add no-store hint to CAPTCHA challenge stanzas (#2730)
---

diff --git a/src/ejabberd_captcha.erl b/src/ejabberd_captcha.erl
index 9f9d7b03f..76e7b37b6 100644
--- a/src/ejabberd_captcha.erl
+++ b/src/ejabberd_captcha.erl
@@ -105,12 +105,13 @@ create_captcha(SID, From, To, Lang, Limiter, Args) ->
 			  "To unblock them, visit ~s">>, [JID, get_url(Id)]},
 	  Body = xmpp:mk_text(BodyString, Lang),
 	  OOB = #oob_x{url = get_url(Id)},
+	  Hint = #hint{type = 'no-store'},
 	  Tref = erlang:send_after(?CAPTCHA_LIFETIME, ?MODULE,
 				   {remove_id, Id}),
 	  ets:insert(captcha,
 		     #captcha{id = Id, pid = self(), key = Key, tref = Tref,
 			      args = Args}),
-	  {ok, Id, Body, [OOB, Captcha, Data]};
+	  {ok, Id, Body, [Hint, OOB, Captcha, Data]};
       Err -> Err
     end.