--- loncom/lonmemcached	2005/07/08 01:20:46	1.3
+++ loncom/lonmemcached	2007/08/22 19:53:22	1.7
@@ -1,4 +1,6 @@
 #!/usr/bin/perl
+# $Id: lonmemcached,v 1.7 2007/08/22 19:53:22 albertel Exp $
+
 $pidfile="/home/httpd/perl/logs/lonmemcached.pid";
 $logfile="/home/httpd/perl/logs/lonmemcached.log";
 
@@ -15,4 +17,10 @@ open (PIDSAVE,">$pidfile");
 print PIDSAVE "$$\n";
 close(PIDSAVE);
 
-exec('/usr/sbin/memcached','-m','256','-v');
+if (-e '/usr/sbin/memcached') {
+    exec('/usr/sbin/memcached','-m','400','-v');
+} elsif (-e '/usr/bin/memcached') {
+    exec('/usr/bin/memcached','-m','400','-v');
+} else {
+    die("Unable to find memcached");
+}