From 2f90bbb5febd44bc9ff8dbff9267f535f907c307 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Sun, 29 Jan 2017 19:34:35 +0100 Subject: lisp/*.el: Fix some warnings * lisp/battery.el (dbus-get-property): * lisp/dired-aux.el (format-spec): Declare function. * lisp/net/zeroconf.el (zeroconf-list-service-names) (zeroconf-list-service-types, zeroconf-list-services): Mark unused lexical arg. * lisp/progmodes/hideshow.el (hs-hide-block-at-point): * lisp/progmodes/sql.el (sql-end-of-statement): Pass LIMIT to 'looking-back'. --- lisp/progmodes/sql.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/progmodes/sql.el') diff --git a/lisp/progmodes/sql.el b/lisp/progmodes/sql.el index 71563486ecd..88683431290 100644 --- a/lisp/progmodes/sql.el +++ b/lisp/progmodes/sql.el @@ -2790,7 +2790,7 @@ local variable." ;; Iterate until we've moved the desired number of stmt ends (while (not (= (cl-signum arg) 0)) ;; if we're looking at the terminator, jump by 2 - (if (or (and (> 0 arg) (looking-back term)) + (if (or (and (> 0 arg) (looking-back term nil)) (and (< 0 arg) (looking-at term))) (setq n 2) (setq n 1)) -- cgit v1.2.1