On Tue, 31 Mar 2009, Maxim Olivier-Adlhoch wrote:

> hi,
>
> I guess you refer to my script :-)
>
> its just a rebol implementation of the getenv function which allows you
> retrieve any of the system's environment variables.
>
> -MAx
>
>
> On Tue, Mar 31, 2009 at 7:42 AM, <[email protected]> wrote:
>
> >
> > On Mon, 30 Mar 2009, Maxim Olivier-Adlhoch wrote:
> >
> > > Hi all,
> > >
> > > you can use the library system to get the env.  directly... since its now
> > > free as of v2.7.6 its not a big deal.
> > >
> > > but you still need to source the config (user.r) script manually then.
> > >
> > >
> > > --------------------------------------------------------------
> > >     ;-    libc
> > >     libc*: context [
> > >
> > >         libc: make library! switch system/version/4 [
> > >              2 [%libc.dylib]        ; OSX
> > >              3 [%msvcrt.dll]        ; Windows
> > >              4 [%libc.so]           ; Linux
> > >              7 [%libc.so]           ; FreeBSD
> > >              8 [%libc.so]           ; NetBSD
> > >              9 [%libc.so]           ; OpenBSD
> > >             10 [%libc.so]           ; Solaris
> > >         ]
> > >
> > >         getenv: make routine! [
> > >             "Get an environment variable."
> > >             in-string [string!] "Name of an environment variable"
> > >             return: [string!]
> > >         ] libc "getenv"
> > >
> > >     ]
> > >
> > >
> > >     ;-    getenv
> > >     getenv: func [
> > >         "REBOL friendly getenv function"
> > >         varname [word! string!]
> > >     ][
> > >         varname: to-string varname
> > >         if find varname " " [
> > >             to-error "os.getenv() varname may not contain spaces."
> > >         ]
> > >
> > >         return libc*/getenv as-string varname
> > >     ]
> > >
> > > home-path: probe get-env 'HOME
> > >
> > > do join dirize to-rebol-file home-path %rebol-user-config.r
> > >
> > >
> > > -------------------------------------------------------
> > >
> > > HTH!
> > >
> > > -MAx
> >
> > I don't yet understand REBOL enough or it's inner workings to "see"
> > how the above code would point the interpreter to where I want REBOL's
> > "script home" to be.
> > --

Please do not top-post....

Thank you for the script's explanation. I have saved it in my REBOL-snippets
file. You never know.....? L8r..
-- 
Duke Normandin
A: Because it messes up the order in which people normally read text.
Q: Why is top-posting such a bad thing?
A: Top-posting.
Q: What is the most annoying thing in e-mail?

-- 
To unsubscribe from the list, just send an email to 
lists at rebol.com with unsubscribe as the subject.

Reply via email to