summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ScrollByL.c5
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);
}