# HG changeset patch
# User Matthew Wild <mwild1@gmail.com>
# Date 1274350431 -3600
# Node ID ca149818083d06ec624640f68971cd10033b3de9
# Parent  892c498692932e213bc4d2c2da5899e345c59574
util.sasl_cyrus: Support for specifying the application name (to pass to Cyrus SASL's init())

diff -r 892c49869293 -r ca149818083d util/sasl_cyrus.lua
--- a/util/sasl_cyrus.lua	Thu May 20 11:08:51 2010 +0100
+++ b/util/sasl_cyrus.lua	Thu May 20 11:13:51 2010 +0100
@@ -45,10 +45,10 @@
 end
 
 -- create a new SASL object which can be used to authenticate clients
-function new(realm, service_name)
+function new(realm, service_name, app_name)
 	local sasl_i = {};
 
-	init(service_name);
+	init(app_name or service_name);
 
 	sasl_i.realm = realm;
 	sasl_i.service_name = service_name;