haskal
/
utop
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix cond default clause

This commit is contained in:
Rudi Grinberg 2017-08-18 10:18:39 -04:00
parent f54d1291b1
commit e1e589b5ea
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/top/utop.el
View File

@ -325,7 +325,7 @@ it is started."
(msg (concat ": " status-name "[" (int-to-string code) "]"))) (msg (concat ": " status-name "[" (int-to-string code) "]")))
(add-text-properties 0 (length msg) '(face bold) msg) (add-text-properties 0 (length msg) '(face bold) msg)
msg)) msg))
(else ": unknown")))) (t ": unknown"))))
(_ ": unknown")))) (_ ": unknown"))))
(defun utop-send-data (cmd) (defun utop-send-data (cmd)