diff --git a/README.md b/README.md index 6c2831f07..2d5f36c7f 100644 --- a/README.md +++ b/README.md @@ -23,9 +23,9 @@ Other Lem features include: # Download -**Lem 2.0 was released!** +**Lem 2.1 was released!** -See our [Lem 2.0 realease](https://github.com/lem-project/lem/releases/tag/v2.0.0) to +See our [Lem 2.1 realease](https://github.com/lem-project/lem/releases/tag/v2.1.0) to download binaries for Windows, MacOS and Linux. On mac, you need to run `xattr -d com.apple.quarantine /Applications/lem.app`. diff --git a/src/ext/directory-mode.lisp b/src/ext/directory-mode.lisp index d4b522a48..73ac234c4 100644 --- a/src/ext/directory-mode.lisp +++ b/src/ext/directory-mode.lisp @@ -458,7 +458,7 @@ "Sort files: by name, by last modification time, then by size. Each new directory buffer first uses the default sort method (`lem/directory-mode:*default-sort-method*')" - (let ((filename (file-namestring (get-pathname (current-point))))) + (let ((path (get-pathname (current-point)))) (cond ;; mtime -> size ((eql (buffer-value (current-buffer) :sort-method) :mtime) @@ -477,7 +477,8 @@ (update (current-buffer) :sort-method :mtime))) ;; Follow file name. - (search-filename-and-recenter filename))) + (when (and path (str:non-blank-string-p (file-namestring path))) + (search-filename-and-recenter (file-namestring path))))) (define-command make-directory (filename) ("FMake directory: ") (setf filename (uiop:ensure-directory-pathname filename))