X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fx-scrollbar.el;h=0479572e241dd694bf8a34b8adb4d755ebbe9fc1;hb=ece47a0efe1526c65bf5e71136886425e05f85d9;hp=1038320236afc47bdc5e3a1b2cae08eea9a29a97;hpb=6883ee56ec887c2c48abe5b06b5e66aa74031910;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/x-scrollbar.el b/lisp/x-scrollbar.el
index 1038320..0479572 100644
--- 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)