Get rid of RM as unix `remove`
Get rid of RM as unix `remove`

Rebol's REMOVE is different from the port action of DELETE, so having
RM mean "remove" is both a discouraged abbreviation and inaccurate
for the context.

(Also, Rebmu uses RM to mean REMOVE)

draegtun/ren-c,giuliolunati/ren-c,giuliolunati/ren-c,rgchris/ren-c,hostilefork/rebol,giuliolunati/ren-c,hostilefork/rebol,draegtun/ren-c,codebybrett/ren-c,rgchris/ren-c,giuliolunati/ren-c,draegtun/ren-c,draegtun/ren-c,hostilefork/rebol,rgchris/ren-c,kealist/ren-c,rgchris/ren-c,hostilefork/rebol,kealist/ren-c,kealist/ren-c,draegtun/ren-c,codebybrett/ren-c,codebybrett/ren-c,kealist/ren-c,codebybrett/ren-c,giuliolunati/ren-c,rgchris/ren-c,kealist/ren-c,hostilefork/rebol,codebybrett/ren-c
REBOL [
    System: "REBOL [R3] Language Interpreter and Run-time Environment"
    Title: "REBOL 3 Mezzanine: Shell-like Command Functions"
    Rights: {
        Copyright 2012 REBOL Technologies
        REBOL is a trademark of REBOL Technologies
    }
    License: {
        Licensed under the Apache License, Version 2.0
        See: http://www.apache.org/licenses/LICENSE-2.0
    }
]

ls:     :list-dir
pwd:    :what-dir

rm: does [
    fail "Use DELETE, not RM (Rebol REMOVE is different, shell dialect coming)"
]

mkdir:  :make-dir

cd: func [
    "Change directory (shell shortcut function)."
    'path [file! word! path! unset! string!]
        "Accepts %file, :variables and just words (as dirs)"
][
    ; !!! to-word necessary as long as OPTIONS_DATATYPE_WORD_STRICT exists
    switch to-word type-of :path [
        unset! [print what-dir]
        file! [change-dir path]
        string! [change-dir to-rebol-file path]
        word! path! [change-dir to-file path]
    ]
]

more: func [
    "Print file (shell shortcut function)."
    'file [file! word! path! string!]
        "Accepts %file and also just words (as file names)"
][
    ; !!! to-word necessary as long as OPTIONS_DATATYPE_WORD_STRICT exists
    print deline to-string read switch to-word type-of :file [
        file! [file]
        string! [to-rebol-file file]
        word! path! [to-file file]
    ]
]

REBOL [
    System: "REBOL [R3] Language Interpreter and Run-time Environment"
    Title: "REBOL 3 Mezzanine: Shell-like Command Functions"
    Rights: {
        Copyright 2012 REBOL Technologies
        REBOL is a trademark of REBOL Technologies
    }
    License: {
        Licensed under the Apache License, Version 2.0
        See: http://www.apache.org/licenses/LICENSE-2.0
    }
]

ls:     :list-dir
pwd:    :what-dir
rm:     :delete
mkdir:  :make-dir

cd: func [
    "Change directory (shell shortcut function)."
    'path [file! word! path! unset! string!]
        "Accepts %file, :variables and just words (as dirs)"
][
    ; !!! to-word necessary as long as OPTIONS_DATATYPE_WORD_STRICT exists
    switch to-word type-of :path [
        unset! [print what-dir]
        file! [change-dir path]
        string! [change-dir to-rebol-file path]
        word! path! [change-dir to-file path]
    ]
]

more: func [
    "Print file (shell shortcut function)."
    'file [file! word! path! string!]
        "Accepts %file and also just words (as file names)"
][
    ; !!! to-word necessary as long as OPTIONS_DATATYPE_WORD_STRICT exists
    print deline to-string read switch to-word type-of :file [
        file! [file]
        string! [to-rebol-file file]
        word! path! [to-file file]
    ]
]
