From 46a87b3e0c6ba34facea2b239172c13d3df90e38 Mon Sep 17 00:00:00 2001
From: Andreas Schneider <aksdb@gmx.de>
Date: Mon, 28 Sep 2015 11:09:59 +0200
Subject: [PATCH] Fixed missing result

---
 UCRTHelper.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/UCRTHelper.pas b/UCRTHelper.pas
index 55d8fc6..6dbc240 100644
--- a/UCRTHelper.pas
+++ b/UCRTHelper.pas
@@ -17,7 +17,7 @@ implementation
 
 function Prompt(ACaption: String; AMode: TPromptMode): String;
 begin
-  Prompt(ACaption, '', AMode);
+  Result := Prompt(ACaption, '', AMode);
 end;
 
 function Prompt(ACaption, ADefault: String; AMode: TPromptMode): String;