# HG changeset patch # User Sebastian Kremer # Date 718194963 0 # Node ID 5054c696885dc2015aa80c820d12267458b77ab7 # Parent 955ebdb98095ae92293527bcfef12f487c93f894 (dired-lisp-ls): var `short' was erronously unbound. diff -r 955ebdb98095 -r 5054c696885d lisp/ls-lisp.el --- a/lisp/ls-lisp.el Sun Oct 04 04:10:02 1992 +0000 +++ b/lisp/ls-lisp.el Sun Oct 04 10:36:03 1992 +0000 @@ -2,8 +2,8 @@ ;;;; READ THE WARNING BELOW BEFORE USING THIS PROGRAM! -(defconst dired-lisp-version (substring "$Revision: 1.7 $" 11 -2) - "$Id: dired-lisp.el,v 1.7 1992/04/30 10:37:15 sk Exp sk $") +(defconst dired-lisp-version (substring "$Revision: 1.8 $" 11 -2) + "$Id: dired-lisp.el,v 1.8 1992/05/01 17:50:56 sk Exp sk $") ;; Copyright (C) 1992 by Sebastian Kremer @@ -25,7 +25,7 @@ ;; LCD Archive Entry: ;; dired-lisp|Sebastian Kremer|sk@thp.uni-koeln.de ;; |emulate Tree Dired's ls completely in Emacs Lisp -;; |$Date: 1992/04/30 10:37:15 $|$Revision: 1.7 $| +;; |$Date: 1992/05/01 17:50:56 $|$Revision: 1.8 $| ;; INSTALLATION ======================================================= ;; @@ -129,6 +129,7 @@ (default-directory dir);; so that file-attributes works (sum 0) elt + short (file-list (directory-files dir nil wildcard)) file-alist ;; do all bindings here for speed