 
 (defun erlang-at-keyword ()
   "Are we looking at an Erlang keyword which will increase indentation?"
-  (looking-at (concat "\\(when\\|if\\|fun\\|case\\|begin\\|query\\|"
+  (looking-at (concat "\\(when\\|if\\|fun\\|case\\|begin\\|"
 		      "of\\|receive\\|after\\|catch\\|try\\)[^_a-zA-Z0-9]")))
 
 (defun erlang-at-operator ()

			 (erlang-skip-blank to)))
		   (eq (following-char) ?\())
		 (erlang-push (list 'fun token (current-column)) stack)))
	    ((looking-at "\\(begin\\|query\\)[^_a-zA-Z0-9]")
	     (erlang-push (list 'begin token (current-column)) stack))
	    ;; Normal when case
	    ;;((looking-at "when\\s ")

      "if"
      "let"
      "of"
      "receive"
      "try"
      "when")
