Rebol Programming/save-user
USAGE:
editSAVE-USER
DESCRIPTION:
editSave user.r, prompting for overwrite permission
SAVE-USER is a function value.
SOURCE CODE
editsave-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. ^-^-} ] ]