diff options
-rw-r--r-- | ScrollByL.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/ScrollByL.c b/ScrollByL.c index b2dc4f8..18eba96 100644 --- a/ScrollByL.c +++ b/ScrollByL.c @@ -701,8 +701,11 @@ Destroy(Widget w) if (sblw->scroll.bar != NULL) XtDestroyWidget(sblw->scroll.bar); /* Destroy scrollbar. */ - if (sblw->scroll.file != NULL) + if (sblw->scroll.file != NULL) { fclose(sblw->scroll.file); + sblw->scroll.file = NULL; + } + LoadFile(w); DestroyGCs(w); } |