From 63b7f5df6e2a1ff561bfdf5f39090e9d103e6e42 Mon Sep 17 00:00:00 2001 From: "wojciech.meyer" Date: Thu, 1 Mar 2012 02:43:22 +0100 Subject: [PATCH] Remove trailing whitespace Ignore-this: 89ea7ff25320e70fb51524e9a5673f darcs-hash:20120301014322-33bd9-eab207fe4cf1799e666045d16ae68dddd8602e6b --- src/top/utop.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/top/utop.el b/src/top/utop.el index 22fd576..1f2754c 100644 --- a/src/top/utop.el +++ b/src/top/utop.el @@ -770,7 +770,7 @@ defaults to 0." ;; Find the longest package name (mapc (lambda (package) - (setq max-name-length + (setq max-name-length (max max-name-length (length (car package))))) packages) ;; Minimal size of the name entry shall be 16 characters