diff options
| author | Fernando Nasser <fnasser@redhat.com> | 2001-01-03 03:42:19 +0000 |
|---|---|---|
| committer | Fernando Nasser <fnasser@redhat.com> | 2001-01-03 03:42:19 +0000 |
| commit | f43ac2145f80cd9d6caacff3bf95b3bbb1ad8dfe (patch) | |
| tree | 67abf846015c7bcc7df3f3279123ae56b37ed95f /gdb | |
| parent | a201b313d10b96da49a851c57e83fbe0cdd14426 (diff) | |
| download | gdb-f43ac2145f80cd9d6caacff3bf95b3bbb1ad8dfe.tar.gz | |
2001-01-02 Fernando Nasser <fnasser@totem.toronto.redhat.com>
* library/interface.tcl (gdbtk_quit_check): Save session whenever
possible.
Diffstat (limited to 'gdb')
| -rw-r--r-- | gdb/gdbtk/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/gdbtk/library/interface.tcl | 5 |
2 files changed, 9 insertions, 1 deletions
diff --git a/gdb/gdbtk/ChangeLog b/gdb/gdbtk/ChangeLog index a02e8149a99..885ca10a6b3 100644 --- a/gdb/gdbtk/ChangeLog +++ b/gdb/gdbtk/ChangeLog @@ -1,3 +1,8 @@ +2001-01-02 Fernando Nasser <fnasser@totem.toronto.redhat.com> + + * library/interface.tcl (gdbtk_quit_check): Save session whenever + possible. + 2001-01-01 Fernando Nasser <fnasser@totem.toronto.redhat.com> * library/ChangeLog-2000: New file. Entries dated 2000 moved here diff --git a/gdb/gdbtk/library/interface.tcl b/gdb/gdbtk/library/interface.tcl index a322d5bb1b9..c00aea3ed61 100644 --- a/gdb/gdbtk/library/interface.tcl +++ b/gdb/gdbtk/library/interface.tcl @@ -222,7 +222,10 @@ proc gdbtk_quit_check {} { if {![gdbtk_tcl_query $msg no]} { return 0 } - } elseif {$gdb_exe_name != ""} { + } + + # If we have an executable file loaded, save a session associated to it + if {$gdb_exe_name != ""} { session_save } return 1 |