diff --git a/Form/REST/Main.cls.xml b/Form/REST/Main.cls.xml
index e4a1563..0a176b8 100644
--- a/Form/REST/Main.cls.xml
+++ b/Form/REST/Main.cls.xml
@@ -12,6 +12,7 @@
 
 <Route Url="/logout" Method="GET" Call="logout"/>
 <Route Url="/test" Method="GET" Call="test"/>
+<Route Url="/info" Method="GET" Call="info"/>
 </Routes>
 ]]></Data>
 </XData>
@@ -39,5 +40,16 @@
     return $$$OK
 ]]></Implementation>
 </Method>
+
+<Method name="info">
+<ClassMethod>1</ClassMethod>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	set info = {}
+	set info.languages = ##class(Form.Util.Translate).getLanguages()
+	write info.$toJSON()	
+	quit $$$OK
+]]></Implementation>
+</Method>
 </Class>
 </Export>
diff --git a/Form/Util/Translate.cls.xml b/Form/Util/Translate.cls.xml
index 5ff67f1..4e56cd5 100644
--- a/Form/Util/Translate.cls.xml
+++ b/Form/Util/Translate.cls.xml
@@ -41,5 +41,19 @@ do ##class(Form.Util.Translate).Insert()</Description>
 	set a = $$macroText^%occMessages($lb(text, domain))
 ]]></Implementation>
 </Method>
+
+<Method name="getLanguages">
+<ClassMethod>1</ClassMethod>
+<ReturnType>%Array</ReturnType>
+<Implementation><![CDATA[
+	set languages = []
+	#dim list As %ListOfDataTypes
+	set list = ##class(%MessageDictionary).GetLanguages($$$domain)
+	for i=1:1:list.Count() {
+		do languages.$push(list.GetAt(i))
+	}
+	quit languages
+]]></Implementation>
+</Method>
 </Class>
 </Export>