new.file.bot {ArvoRe}R Documentation

~~function to do ... ~~

Description

~~ A concise (1-5 lines) description of what the function does. ~~

Usage

new.file.bot(...)

Arguments

... ~~Describe ... here~~

Details

~~ If necessary, more details than the description above ~~

Value

~Describe the value returned If it is a LIST, use

comp1 Description of 'comp1'
comp2 Description of 'comp2'

...

Warning

....

Note

~~further notes~~

~Make other sections like Warning with section{Warning }{....} ~

Author(s)

~~who you are~~

References

~put references to the literature/web site here ~

See Also

~~objects to See Also as help, ~~~

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--    or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function(...) {
        ans <- tkmessageBox(message="Deseja salvar a árvore atual?",icon="question",type="yesnocancel",default="yes")
        ans <- tclvalue(ans)
        if (ans != "yes") {
                if (ans == "no") {
                        clearTreeTkArvore(TheTree)
                        new.tree()
                        theTreeTkArvore(TheTree)
                        atualiza.grafico()
                } else {
                        tkfocus(tt)
                }
        } else {
                save.file.arv()
                clearTreeTkArvore(TheTree)
                new.tree()
                theTreeTkArvore(TheTree)
                atualiza.grafico()              
        }
  }

[Package ArvoRe version 0.1.6 Index]