Mercurial > hg > xemacs-beta

comparison lisp/check-features.el @ 371:cc15677e0335 r21-2b1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2b1
author cvs
date Mon, 13 Aug 2007 11:03:08 +0200
parents 336b97f03633
children 74fd4e045ea6
comparison
equal deleted inserted replaced
370:bd866891f083 371:cc15677e0335
37 37
38 (when (featurep 'tooltalk) 38 (when (featurep 'tooltalk)
39 (condition-case nil 39 (condition-case nil
40 (package-require 'tooltalk 1.0) 40 (package-require 'tooltalk 1.0)
41 (t (progn 41 (t (progn
42 ;; (setq build-error 1) 42 (setq build-error 1)
43 (message "Warning: This XEmacs is built with tooltalk support but") 43 (message "Error: This XEmacs is built with tooltalk support but")
44 (message "does not have a tooltalk package installed. Without the") 44 (message "does not have a tooltalk package installed. Without the")
45 (message "tooltalk lisp package, Tooltalk support is broken."))))) 45 (message "tooltalk lisp package, Tooltalk support is broken.")))))
46 46
47 (when (featurep 'sparcworks) 47 (when (featurep 'sparcworks)
48 (condition-case nil 48 (condition-case nil
49 (package-require 'Sun 1.0) 49 (package-require 'Sun 1.0)
50 (t (progn 50 (t (progn
51 ;; (setq build-error 1) 51 (setq build-error 1)
52 (message "Warning: This XEmacs is built with sparcworks support but") 52 (message "Error: This XEmacs is built with sparcworks support but")
53 (message "does not have the Sun package installed. Without the Sun") 53 (message "does not have the Sun package installed. Without the Sun")
54 (message "lisp package, Sparcworks support will be broken."))))) 54 (message "lisp package, Sparcworks support will be broken.")))))
55 55
56 (kill-emacs build-error) 56 (kill-emacs build-error)
57 57