Mercurial > hg > xemacs-beta

comparison lisp/find-paths.el @ 355:182f72e8cd0d r21-1-7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-1-7
author cvs
date Mon, 13 Aug 2007 10:56:21 +0200
parents 33bdb3d4b97f
children a4f53d9b3154
comparison
equal deleted inserted replaced
354:3729bef672e0 355:182f72e8cd0d
217 "Find an architecture-specific directory in the XEmacs hierarchy." 217 "Find an architecture-specific directory in the XEmacs hierarchy."
218 (or 218 (or
219 ;; from more to less specific 219 ;; from more to less specific
220 (paths-find-version-directory roots 220 (paths-find-version-directory roots
221 (concat base system-configuration) 221 (concat base system-configuration)
222 envvar) 222 envvar default)
223 (paths-find-version-directory roots 223 (paths-find-version-directory roots
224 base 224 base
225 envvar) 225 envvar)
226 (paths-find-version-directory roots 226 (paths-find-version-directory roots
227 system-configuration 227 system-configuration
228 envvar default))) 228 envvar)))
229 229
230 (defun construct-emacs-version-name () 230 (defun construct-emacs-version-name ()
231 "Construct the raw XEmacs version number." 231 "Construct the raw XEmacs version number."
232 (concat emacs-program-name "-" emacs-program-version)) 232 (concat emacs-program-name "-" emacs-program-version))
233 233