[Lxr-commits] CVS: lxr source,1.68,1.69

[Andre-Littoz <ajl...@us...>]

Update of /cvsroot/lxr/lxr
In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv22431

Modified Files:
	source 
Log Message:
source: special request

KDE LXR site maintainer requested to always show indexing time in file display; feature available after commenting/uncommenting two blocks in code -- not for general use

Index: source
===================================================================
RCS file: /cvsroot/lxr/lxr/source,v
retrieving revision 1.68
retrieving revision 1.69
diff -u -d -r1.68 -r1.69
--- source	29 Nov 2013 15:44:55 -0000	1.68
+++ source	25 Oct 2014 18:29:06 -0000	1.69
@@ -868,6 +868,11 @@
 			#	}
 			} else {
 				# Check for a discrepancy between file and database states
+				# Two implementations are available hereunder. Uncomment only one:
+				# - standard notification (warning on stale index)
+				# - permanent notification (indexing time always displayed or warning)
+				# Standard notification is recommended
+############ Standard notification ############
 				if	(!$index->filetimestamp
 								( $pathname
 								, $files->filerev($pathname, $releaseid)
@@ -878,6 +883,29 @@
 						"<p class=\"error\">\n<i>Warning, cross-references for $pathname need to be fixed.</i>\n</p>\n"
 					);
 				}
+############ End of standard notification ############
+# ############ Special request from KDE site maintainer ############
+# # NOTE: Is it really relevant since the above block gives an error
+# #		indication when indexing time is stale?
+# #	The main difference is explicit notice of non-parsed file
+# 				my $t = indextime(@_,  '', $pathname);
+# 				if ('-' eq $t) {
+# 					if (LXR::Lang::parseable($pathname)) {
+# 						print(
+# 							"<p class=\"error\">\n<i>Warning, cross-references for $pathname need to be fixed.</i>\n</p>\n"
+# 						);
+# 					} else {
+# 						print(
+# 							"<p class=\"error\">\n<i>Warning, $pathname is written in an unparsed language.</i>\n</p>\n"
+# 						);
+# 					};
+# 				} else {
+# 					print(
+# 						"<p>\nFile indexed on <i>$t</i>\n</p>\n"
+# 					);
+# 				};
+# ############ End of special request ############
+
 				if (exists($config->{'cvswebprefix'})) {
 					my $revtarget = '';
 					$revtarget = "#rev$releaseid" if lc($releaseid) ne 'head';