[SCM] Lisaac compiler branch, master, updated. lisaac-0.12-552-g2849aaa

[Benoit Sonntag]

The following commit has been merged in the master branch:
commit 2849aaa87e381504089153dad74284069e419128
Author: Benoit Sonntag <sonntag at icps.u-strasbg.fr>
Date:   Tue Dec 1 00:15:05 2009 +0100

    Mildred shorter path ok

diff --git a/src/lisaac.li b/src/lisaac.li
index c2c025f..36295a6 100644
--- a/src/lisaac.li
+++ b/src/lisaac.li
@@ -102,8 +102,8 @@ Section Private
 
   - begin_usage2: STRING_CONSTANT :=
   "--\n\
-  \--            LORIA - LSIIT - ULP - CNRS - FRANCE             --\n\
-  \--         Benoit SONNTAG - sonntag at icps.u-strasbg.fr         --\n\
+  \--            LORIA - LSIIT - UDS - CNRS - FRANCE             --\n\
+  \--         Benoit SONNTAG - benoit.sonntag at lisaac.org         --\n\
   \--                   http://www.lisaac.org                    --\n\
   \----------------------------------------------------------------\n\
   \Usage:                                                          \n\
diff --git a/src/shorter.li b/src/shorter.li
index e71eafc..8b1402a 100644
--- a/src/shorter.li
+++ b/src/shorter.li
@@ -72,9 +72,9 @@ Section Private
   - usage:STRING_CONSTANT :=
   "----------------------------------------------------------------\n\
   \--                   Lisaac source Shorter                    --\n\
-  \--            LORIA - LSIIT - ULP - CNRS - FRANCE             --\n\
-  \--         Benoit SONNTAG - sonntag at icps.u-strasbg.fr         --\n\
-  \--                   http://www.IsaacOS.com                   --\n\
+  \--            LORIA - LSIIT - UDS - CNRS - FRANCE             --\n\
+  \--         Benoit SONNTAG - benoit.sonntag at lisaac.org         --\n\
+  \--                   http://www.lisaac.org                    --\n\
   \----------------------------------------------------------------\n\
   \Usage:                                                      \n\
   \  shorter <input_file[.li]> [Options]                       \n\
@@ -91,17 +91,21 @@ Section Private
   \                                                            \n\
   \Examples:                                                   \n\
   \  * Output format file:                                     \n\
-  \    shorter -c -p -f latex hello_world.li                   \n\ 
+  \      shorter -c -p -f latex hello_world.li                 \n\ 
   \                                                            \n\
   \  * Build html documentation:                               \n\
-  \    shorter -r -f html ~/lisaac/lib                         \n\
+  \      shorter -r -f html ~/lisaac/lib                       \n\
   \                                                            \n\
   \  * Build html documentation style JavaDoc:                 \n\
-  \    shorter -d -f belinda ~/lisaac/lib                      \n\
+  \   - With directory:                                        \n\
+  \      shorter -d -f belinda ~/lisaac/lib                    \n\
+  \   - With current `make.lip'                                \n\
+  \      shorter -d -f belinda                                 \n\ 
+  \   - With specific `make.lip'                               \n\
+  \      shorter -d -f belinda ../make.lip                     \n\
   \                                                            \n\
   \Bug report:                                                 \n\
-  \            post in : https://gna.org/bugs/?group=isaac     \n\
-  \            mail to : sonntag at icps.u-strasbg.fr             \n";
+  \    post in: https://alioth.debian.org/projects/lisaac/     \n";
 
   - display_usage <-
   (
@@ -400,6 +404,7 @@ Section Public
 	die_with_code exit_failure_code;
       };
       dir ?= ent;
+      path_begin := dir.path.count + 2;
       check_in dir begin (dir.path.count + 1);
       // index file.
       (PARSER.short_dico.fast_has (ALIAS_STR.short_index)).if {

-- 
Lisaac compiler