diff options
Diffstat (limited to 'scripts/kde-emacs/kde-emacs-general.el')
| -rw-r--r-- | scripts/kde-emacs/kde-emacs-general.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/scripts/kde-emacs/kde-emacs-general.el b/scripts/kde-emacs/kde-emacs-general.el index aae86d2f..be34047c 100644 --- a/scripts/kde-emacs/kde-emacs-general.el +++ b/scripts/kde-emacs/kde-emacs-general.el @@ -29,7 +29,7 @@ ;*---------------------------------------------------------------------*/ ;; Helper for kde-file-get-cpp-h -(defun kde-tqfind-file (filename basedir) +(defun kde-find-file (filename basedir) "Looks for \"filename\" under \"basedir\"" (if basedir (let ((path (concat basedir "/" filename))) @@ -68,7 +68,7 @@ return (\"test.cpp\" t)." ) (if (not ret) (progn ; look in kde-source-directory - (setq path (kde-tqfind-file (file-name-nondirectory path) kde-source-directory)) + (setq path (kde-find-file (file-name-nondirectory path) kde-source-directory)) (if (and path (file-readable-p path)) @@ -95,7 +95,7 @@ return (\"test.cpp\" t)." (setq ret (cons path t))))) (if (not (file-readable-p path)) (progn ; look in kde-include-directory - (setq path (kde-tqfind-file (file-name-nondirectory path) kde-include-directory)) + (setq path (kde-find-file (file-name-nondirectory path) kde-include-directory)) (if (and path (file-readable-p path)) @@ -118,7 +118,7 @@ return (\"test.cpp\" t)." (interactive) (let ((file (kde-file-get-cpp-h))) (if (car file) - (tqfind-file (car file)) + (find-file (car file)) (error "Corresponding source file doesn't exist.") ) )) |