only toggle scroll bar if we have that function

git-svn-id: file:///svn/tfheen/trunk/dotfiles@82 8da78d58-1cd3-0310-bee5-d77bd1b3e8bf

diff --git a/emacs b/emacs
index fa57ca95ca9781b0e766bdef3f476f06ae143b91..e8f76c4640754550a724871984b7a89bf7139ebf 100644 (file)
--- a/emacs
+++ b/emacs
@@ -137,8 +137,10 @@
 ;; Visual fluff.
 
 (cw/for-emacs
- (toggle-scroll-bar -1)
- (setq scrollbars-visible-p nil))
+ (if (functionp 'toggle-scroll-bar)
+     (progn 
+       (toggle-scroll-bar -1)
+       (setq scrollbars-visible-p nil))))
 
 (setq scroll-bar-mode nil)