| --- quilt-el-0.48.0-orig/quilt.el | |
| +++ quilt-el-0.48.0/quilt.el | |
| @@ -49,7 +49,7 @@ | |
| (defun quilt-find-dir (fn) | |
| "Return the top level dir of quilt from FN." | |
| - (if (or (not fn) (equal fn "/")) | |
| + (if (or (not fn) (equal fn (file-name-directory fn))) | |
| nil | |
| (let ((d (file-name-directory fn))) | |
| (if (file-accessible-directory-p (concat d "/.pc")) |