Changeset 4018 for vendor/emacs-CVS_HEAD/lisp/ibuf-ext.el
- Timestamp:
- 01/28/06 09:46:44 (3 years ago)
- Files:
-
- vendor/emacs-CVS_HEAD/lisp/ibuf-ext.el (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
vendor/emacs-CVS_HEAD/lisp/ibuf-ext.el
r3988 r4018 1022 1022 (or buffer-file-name 1023 1023 (and (boundp 'dired-directory) 1024 (if (stringp dired-directory) 1025 dired-directory 1026 (car dired-directory)) 1027 (expand-file-name dired-directory)))) 1024 (let ((dired-dir 1025 (if (stringp dired-directory) 1026 dired-directory 1027 (car dired-directory)))) 1028 (and dired-dir 1029 (expand-file-name dired-dir)))))) 1028 1030 (string-match qualifier it))) 1029 1031
