Logtalk 2.25.1 files.

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1357 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
pmoura
2005-08-08 12:13:45 +00:00
parent ab97812ec7
commit 80c28e1507
219 changed files with 1380 additions and 1008 deletions

View File

@@ -1,6 +1,6 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.25.0
// Release 2.25.1
//
// Copyright (c) 1998-2005 Paulo Moura. All Rights Reserved.
// =================================================================
@@ -133,7 +133,14 @@ function create_index_file() {
var file = files.item().name;
if (FSObject.GetExtensionName(file) == "xml") {
WScript.Echo(" indexing " + file);
f.WriteLine(" <li><a href=\"" + file + "\">" + FSObject.GetBaseName(file) + "</a></li>");
var index = FSObject.GetBaseName(file).lastIndexOf("_");
var pars = FSObject.GetBaseName(file).slice(index+1);
var entity = FSObject.GetBaseName(file).slice(0, index);
if (pars == 0)
f.WriteLine(" <li><a href=\"" + file + "\">" + entity + "</a></li>");
else
f.WriteLine(" <li><a href=\"" + file + "\">" + entity + "/" + pars + "</a></li>");
}
}