amalgame/commit

MINOR: documentation for serve_static

authorJacco van Ossenbruggen
Thu Aug 21 17:19:47 2014 +0200
committerJacco van Ossenbruggen
Thu Aug 21 17:19:47 2014 +0200
commitf0c3f1e4f97c2562df440b5fce660fa78702befd
treebbaed2be6118537ae35a24507b3151abf318b9b8
parent8dcefd6ba1057862c208a41801ba450796986573
Diff style: patch stat
diff --git a/config-available/025-amalgame.pl b/config-available/025-amalgame.pl
index 9a0ac9f..c86aa28 100644
--- a/config-available/025-amalgame.pl
+++ b/config-available/025-amalgame.pl
@@ -53,6 +53,8 @@ user:file_search_path(img, web(img)).
 serve_static(Alias, Request) :-
 	memberchk(path_info(PathInfo), Request),
 	!,
+	% serve a strategy result directory index or
+	% a file in a strategy result dir:
 	Term =.. [Alias,PathInfo],
 	(   absolute_file_name(Term, _,
 			       [file_type(directory),
@@ -66,6 +68,8 @@ serve_static(Alias, Request) :-
 serve_static(Alias, Request) :-
 	\+ memberchk(path_info(_), Request),
 	!,
+	% no path info, this can only be a request on the
+	% alignment_results directory itself (alignment_results(.)).
 	memberchk(path(Path), Request),
 	sub_atom(Path,  _, _, 1, Alias),
 	Term =.. [Alias, '.' ],