import -ko -b 1.1.3 XEmacs XEmacs-21_2 r21-2-35

[chise/xemacs-chise.git.1] / lisp / x-scrollbar.el

diff --git a/lisp/x-scrollbar.el b/lisp/x-scrollbar.el
index 1038320..0479572 100644 (file)
--- a/lisp/x-scrollbar.el
+++ b/lisp/x-scrollbar.el
@@ -80,7 +80,7 @@
   ;; Now do ScrollBarPlacement.scrollBarPlacement
   (let ((case-fold-search t)
        (resval (x-get-resource "ScrollBarPlacement" "scrollBarPlacement"
-                               'string locale)))
+                               'string locale nil 'warn)))
     (cond
      ((null resval))
      ((string-match "^top[_-]left$" resval)