Cleanups.

This commit is contained in:
Paul Smith 2013-05-27 13:52:15 -04:00
parent ef11217de7
commit d4043519f7
2 changed files with 11 additions and 12 deletions

View file

@ -214,7 +214,7 @@ For both final releases and pre-releases, send an email with the URL of
the package to the GNU translation robot to allow the translators to
work on it:
<translation@iro.umontreal.ca>
<coordinator@translationproject.org>
Where to Announce

21
main.c
View file

@ -1340,25 +1340,24 @@ main (int argc, char **argv, char **envp)
env = Lock ("ENV:", ACCESS_READ);
if (env)
{
{
old = CurrentDir (DupLock (env));
Examine (env, &fib);
while (ExNext (env, &fib))
{
{
if (fib.fib_DirEntryType < 0) /* File */
{
{
/* Define an empty variable. It will be filled in
variable_lookup(). Makes startup quite a bit
faster. */
define_variable (fib.fib_FileName,
strlen (fib.fib_FileName),
"", o_env, 1)->export = v_export;
}
}
variable_lookup(). Makes startup quite a bit faster. */
define_variable (fib.fib_FileName,
strlen (fib.fib_FileName),
"", o_env, 1)->export = v_export;
}
}
UnLock (env);
UnLock (CurrentDir (old));
}
}
}
#endif