From: Michael Heerdegen Date: Sat, 26 Mar 2016 01:33:08 +0000 (+0100) Subject: Small fix in el-search--setup-minibuffer X-Git-Url: https://code.delx.au/gnu-emacs-elpa/commitdiff_plain/246e1ffcdab503b7a304e5894208a85830409fb2 Small fix in el-search--setup-minibuffer --- diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el index eba4a5df1..8e08571f3 100644 --- a/packages/el-search/el-search.el +++ b/packages/el-search/el-search.el @@ -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))))