Anonymous avatar Anonymous committed cbd8516

Removed dependency on SBCL's filesystem APIs for file modified time

Comments (0)

Files changed (1)


 (defgeneric tag-library-file-modified-time (library-name provider)
   (:method (library-name (provider folder-tag-library-provider) )
     (let ((full-path (tag-library-full-path library-name provider) ))
-      (unix-to-timestamp (sb-posix:stat-mtime (sb-posix:stat full-path)) ))))
+      (universal-to-timestamp (file-write-date full-path)))))
 (defun create-folder-tag-library-provider (folder)
   (make-instance 'folder-tag-library-provider :folder folder))
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.