diff options
Diffstat (limited to 'lisp/emacs-lisp/chart.el')
| -rw-r--r-- | lisp/emacs-lisp/chart.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/chart.el b/lisp/emacs-lisp/chart.el index 124ede17fd3..e4b41f41984 100644 --- a/lisp/emacs-lisp/chart.el +++ b/lisp/emacs-lisp/chart.el @@ -607,6 +607,8 @@ SORT-PRED if desired." (chart-bar-quickie 'vertical "Test Bar Chart" '( "U1" "ME2" "C3" "B4" "QT" "EZ") "Items" '( 5 -10 23 20 30 -3) "Values") + (if (not (called-interactively-p 'any)) + (kill-buffer "*Test Bar Chart*")) ) ;;; Sample utility function |