[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [MIT-Scheme-devel] [PATCH] Implement DIRED-UP-DIRECTORY
|
From: |
Taylor R Campbell |
|
Subject: |
Re: [MIT-Scheme-devel] [PATCH] Implement DIRED-UP-DIRECTORY |
|
Date: |
Fri, 24 Apr 2015 17:13:54 +0000 |
|
User-agent: |
IMAIL/1.21; Edwin/3.116; MIT-Scheme/9.1.99 |
Date: Thu, 23 Apr 2015 22:36:32 -0400
From: Rich Loveland <address@hidden>
In the attached patch, I've implemented the DIRED-UP-DIRECTORY command
for Edwin, and bound it to #\^ as found in that other Emacs.
Please let me know if there's a better way of specifying "the next
directory up" than just merging the current directory with "..". I
read through the manual section on pathnames and the runtime pathname
code but I might have missed it.
Probably something like:
(merge-pathnames (make-pathname #f #f '(RELATIVE UP) #f #f #f)
(directory-pathname (dired-current-pathname)))