From ba44fc9cc257bba99b429a14eee473737f680047 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Dan=20S=C4=83nduleac?= Date: Thu, 18 Mar 2021 11:31:49 +0000 Subject: [PATCH] Utop correctly restarts when (not utop-edit-command) ## Problem If `utop-edit-command` is nil, then `utop-query-arguments` returns nil. This breaks `utop-restart` which relies upon it returning the right arguments. ## Solution `utop-query-arguments` always returns `(utop-arguments)` whether it sets the utop-command or not. --- src/top/utop.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/top/utop.el b/src/top/utop.el index 6e34cfd..a5a7930 100644 --- a/src/top/utop.el +++ b/src/top/utop.el @@ -1074,8 +1074,8 @@ defaults to 0." "Return the arguments of the utop command to run." ;; Read the command to run (when utop-edit-command - (setq utop-command (read-shell-command "utop command line: " utop-command)) - (utop-arguments))) + (setq utop-command (read-shell-command "utop command line: " utop-command))) + (utop-arguments)) (defun utop-start (arguments) "Start utop given ARGUMENTS."