(g2-UU+51DC): Unify g2-AJ1-08284, g2-J90-7425, g2-JX1-7425,

[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)