app use config params

lib/Bartender.pm

@@ -12,9 +12,11 @@ get '/shake' => sub {
     my $opt_base   = $param{projetPadPrincipal};
     my $opt_garde  = $param{projetPadGarde};
     my $opt_projet = $param{projetId};
+    my $cocktail = config->{cocktail}{bin};
+    die unless -x $cocktail;
 
-    system("/home/sniperovitch/cocktail/cocktail -d $opt_dossier -b '$opt_base' -g '$opt_garde' -p $opt_projet &");
-     redirect request->referer;
+    system("$cocktail -d $opt_dossier -b '$opt_base' -g '$opt_garde' -p $opt_projet &");
+    redirect request->referer;
 };
 
 
@@ -23,12 +25,14 @@ get '/status' => sub {
     my $opt_dossier = $param{dossier};
     my $opt_projet  = $param{projetId};
 
+    my $cocktail_store = config->{cocktail}{store};
+    die unless -d $cocktail_store;
     my $compilation_status;
-    if(-e "/tmp/exegetes/$opt_dossier/$opt_projet.lock") {
+    if(-e "$cocktail_store/$opt_dossier/$opt_projet.lock") {
         $compilation_status = "En cours de compilation...";
     }
-    elsif(-e "/tmp/exegetes/$opt_dossier/$opt_projet.pdf") {
-        my @stat = stat "/tmp/exegetes/$opt_dossier/$opt_projet.pdf";
+    elsif(-e "$cocktail_store/$opt_dossier/$opt_projet.pdf") {
+        my @stat = stat "$cocktail_store/$opt_dossier/$opt_projet.pdf";
         my $ctime = $stat[10];
         my $date_time = POSIX::strftime("%Y-%m-%d %H:%M:%S", localtime($ctime) );
         $compilation_status = $date_time;