Home | History | Annotate | Download | only in emacs

Lines Matching refs:directory

49 (defun android-makefile-exists-p (directory)
50 "Return t if an Android makefile exists in DIRECTORY."
52 (or (file-exists-p (concat directory "Android.mk"))
53 (file-exists-p (concat directory "Makefile"))))
57 Makefiles are named Android.mk except in the root directory where
59 TOPDIR is the root directory of the build.
63 ;; TODO: Could check that topdir is the start of default-directory.
65 (error "Topdir invalid %s for current dir %s" topdir default-directory))
66 (let ((default-directory default-directory)
69 (while (and (> (length default-directory) (length topdir))
70 (not (android-makefile-exists-p default-directory)))
71 (setq default-directory
72 (substring default-directory 0
73 (string-match "[^/]+/$" default-directory))))
75 (when (not (android-makefile-exists-p default-directory))
78 (if (string= default-directory topdir)
81 (setq default-directory (substring default-directory (length topdir) nil))
82 (setq file (concat default-directory "Android.mk"))