Blank lines in prompt

Author

Sven Schoenung

Synopsis

The window opened by the prompt function shows two blank lines before the prompt even when they aren't needed.

Patch

--- prompt.jl.orig      2007-08-16 20:35:33.000000000 +0200
+++ prompt.jl   2007-08-16 20:46:48.000000000 +0200
@@ -264,9 +264,10 @@
   (defun prompt-update-display ()
     (let ((result (if prompt-display-fun
                      (prompt-display-fun prompt-result)
-                   prompt-result)))
-      (display-message (concat (prompt-format-completions)
-                              "\n\n"
+                   prompt-result))
+         (completions (prompt-format-completions)))
+      (display-message (concat completions
+                              (when completions "\n\n")
                               prompt-prompt
                               (substring result 0 prompt-position)
                               ?| (substring result prompt-position))

Community's reasons for inclusion or rejection

• vote: yes. Looks all right. I have been using this since late October. - Tkorvola 01:10, 2 December 2007 (UTC)
• vote: yes. Apparently no regressions. - Aav 08:22, 16 January 2008 (UTC)
• vote: yes. applied, thanks Janek Kozicki 00:42, 17 January 2008 (UTC)