Rebol Programming/save-user

= USAGE: = SAVE-USER

= DESCRIPTION: = Save user.r, prompting for overwrite permission

SAVE-USER is a function value. = SOURCE CODE = save-user: func [ "Save user.r, prompting for overwrite permission" /local user.r ][ user.r: either view? [view-root/user.r] [system/options/home/user.r]    if any [ not exists? user.r        confirm "^/Overwrite the current user.r file? " ] [       print { Creating user.r file in the REBOL home directory. }        write-user print trim { ^-^-^-To change these settings, type "set-user" at the ^-^-^-prompt or edit your user.r file. ^-^-}   ] ]