Mercurial > hg > xemacs-beta

comparison lisp/find-paths.el @ 424:11054d720c21 r21-2-20

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-20
author cvs
date Mon, 13 Aug 2007 11:26:11 +0200
parents 697ef44129c6
children
comparison
equal deleted inserted replaced
423:28d9c139be4c 424:11054d720c21
216 "Find an architecture-specific directory in the XEmacs hierarchy." 216 "Find an architecture-specific directory in the XEmacs hierarchy."
217 (or 217 (or
218 ;; from more to less specific 218 ;; from more to less specific
219 (paths-find-version-directory roots 219 (paths-find-version-directory roots
220 (concat base system-configuration) 220 (concat base system-configuration)
221 envvar) 221 envvar default)
222 (paths-find-version-directory roots 222 (paths-find-version-directory roots
223 base 223 base
224 envvar) 224 envvar)
225 (paths-find-version-directory roots 225 (paths-find-version-directory roots
226 system-configuration 226 system-configuration
227 envvar default))) 227 envvar)))
228 228
229 (defun construct-emacs-version-name () 229 (defun construct-emacs-version-name ()
230 "Construct the raw XEmacs version number." 230 "Construct the raw XEmacs version number."
231 (concat emacs-program-name "-" emacs-program-version)) 231 (concat emacs-program-name "-" emacs-program-version))
232 232