Mercurial > hg > xemacs-beta

comparison lisp/x-misc.el @ 282:c42ec1d1cded r21-0b39

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b39
author cvs
date Mon, 13 Aug 2007 10:33:18 +0200
parents 41ff10fd062f
children 70ad99077275
comparison
equal deleted inserted replaced
281:090b52736db2 282:c42ec1d1cded
75 75
76 (defun x-get-resource-and-bogosity-check (name class type &optional locale) 76 (defun x-get-resource-and-bogosity-check (name class type &optional locale)
77 (x-bogosity-check-resource name class type) 77 (x-bogosity-check-resource name class type)
78 (x-get-resource name class type locale nil t)) 78 (x-get-resource name class type locale nil t))
79 79
80 ;; #### this function is not necessary.
81 (defun x-get-resource-and-maybe-bogosity-check (name class type &optional 80 (defun x-get-resource-and-maybe-bogosity-check (name class type &optional
82 locale) 81 locale)
83 (if (eq locale 'global) 82 (if (eq locale 'global)
84 (x-bogosity-check-resource name class type)) 83 (x-bogosity-check-resource name class type))
85 (x-get-resource name class type locale nil t)) 84 (x-get-resource name class type locale nil t))