diff options
| author | tpearson <tpearson@283d02a7-25f6-0310-bc7c-ecb5cbfe19da> | 2011-08-10 22:19:39 +0000 |
|---|---|---|
| committer | tpearson <tpearson@283d02a7-25f6-0310-bc7c-ecb5cbfe19da> | 2011-08-10 22:19:39 +0000 |
| commit | 22253cd8fbc0bd2e70f32aaf1f95ea3a3e819a60 (patch) | |
| tree | babc4a761925023e16fa94633959f35d1c251887 /scripts/kde-emacs/dirvars.el | |
| parent | 0813b39aed2cf4c84157a22c4c9594336d93d412 (diff) | |
| download | tdesdk-22253cd8fbc0bd2e70f32aaf1f95ea3a3e819a60.tar.gz tdesdk-22253cd8fbc0bd2e70f32aaf1f95ea3a3e819a60.zip | |
rename the following methods:
tqparent parent
tqmask mask
git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/kdesdk@1246260 283d02a7-25f6-0310-bc7c-ecb5cbfe19da
Diffstat (limited to 'scripts/kde-emacs/dirvars.el')
| -rw-r--r-- | scripts/kde-emacs/dirvars.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/scripts/kde-emacs/dirvars.el b/scripts/kde-emacs/dirvars.el index 94f682b0..5fba18e7 100644 --- a/scripts/kde-emacs/dirvars.el +++ b/scripts/kde-emacs/dirvars.el @@ -96,18 +96,18 @@ The FILE-NAME specifies the file name to search for." (setq dir-name (expand-file-name dir-name)) ;; Move up in the dir hierarchy till we find a change log file. (let ((file1 (concat dir-name file-name)) - tqparent-dir) + parent-dir) (while (and (not (file-exists-p file1)) - (progn (setq tqparent-dir + (progn (setq parent-dir (file-name-directory (directory-file-name (file-name-directory file1)))) ;; Give up if we are already at the root dir. (not (string= (file-name-directory file1) - tqparent-dir)))) - ;; Move up to the tqparent dir and try again. - (setq file1 (expand-file-name file-name tqparent-dir))) - ;; If we found the file in a tqparent dir, use that. Otherwise, + parent-dir)))) + ;; Move up to the parent dir and try again. + (setq file1 (expand-file-name file-name parent-dir))) + ;; If we found the file in a parent dir, use that. Otherwise, ;; return nil (if (or (get-file-buffer file1) (file-exists-p file1)) file1 |