]> code.delx.au - gnu-emacs-elpa/commitdiff
Small fix in el-search--setup-minibuffer
authorMichael Heerdegen <michael_heerdegen@web.de>
Sat, 26 Mar 2016 01:33:08 +0000 (02:33 +0100)
committerMichael Heerdegen <michael_heerdegen@web.de>
Thu, 19 May 2016 20:28:14 +0000 (22:28 +0200)
packages/el-search/el-search.el

index eba4a5df12889aba5d7c5536e354cf41010b2a33..8e08571f3b8a9f1ad904029f2bbd5a41ec5bbe2d 100644 (file)
@@ -313,8 +313,9 @@ error."
   (use-local-map el-search-read-expression-map)
   (setq font-lock-mode t)
   (funcall font-lock-function 1)
-  (backward-sexp)
-  (indent-sexp)
+  (goto-char (minibuffer-prompt-end))
+  (when (looking-at ".*\n")
+    (indent-sexp))
   (goto-char (point-max))
   (when-let ((this-sexp (with-current-buffer (window-buffer (minibuffer-selected-window))
                           (thing-at-point 'sexp))))