diff options
| author | John Paul Wallington | 2004-05-13 13:01:01 +0000 |
|---|---|---|
| committer | John Paul Wallington | 2004-05-13 13:01:01 +0000 |
| commit | 64bd6fd115d9d29a385d4ff1de2aa85a95c1fd18 (patch) | |
| tree | 53ea6877cfa3bb38a53ded631af7f713cbd40b7d | |
| parent | 85f6be548e3b55bdf4d4549011830bcd992f28c0 (diff) | |
| download | emacs-64bd6fd115d9d29a385d4ff1de2aa85a95c1fd18.tar.gz emacs-64bd6fd115d9d29a385d4ff1de2aa85a95c1fd18.zip | |
(emacs-version): Check for `gtk' feature before `x-toolkit' feature.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/version.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a03b43cfad6..9bc828226d3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2004-05-13 John Paul Wallington <jpw@gnu.org> | ||
| 2 | |||
| 3 | * version.el (emacs-version): Check for `gtk' feature before | ||
| 4 | `x-toolkit' feature. | ||
| 5 | |||
| 1 | 2004-05-13 Juanma Barranquero <lektu@terra.es> | 6 | 2004-05-13 Juanma Barranquero <lektu@terra.es> |
| 2 | 7 | ||
| 3 | * help-fns.el (help-arg-highlighting-function) | 8 | * help-fns.el (help-arg-highlighting-function) |
diff --git a/lisp/version.el b/lisp/version.el index 42dbb3f9c25..d489eeea02e 100644 --- a/lisp/version.el +++ b/lisp/version.el | |||
| @@ -61,9 +61,9 @@ to the system configuration; look at `system-configuration' instead." | |||
| 61 | system-configuration | 61 | system-configuration |
| 62 | (cond ((featurep 'motif) | 62 | (cond ((featurep 'motif) |
| 63 | (concat ", " (substring motif-version-string 4))) | 63 | (concat ", " (substring motif-version-string 4))) |
| 64 | ((featurep 'x-toolkit) ", X toolkit") | ||
| 65 | ((featurep 'gtk) | 64 | ((featurep 'gtk) |
| 66 | (concat ", GTK+ Version " gtk-version-string)) | 65 | (concat ", GTK+ Version " gtk-version-string)) |
| 66 | ((featurep 'x-toolkit) ", X toolkit") | ||
| 67 | (t "")) | 67 | (t "")) |
| 68 | (if (and (boundp 'x-toolkit-scroll-bars) | 68 | (if (and (boundp 'x-toolkit-scroll-bars) |
| 69 | (memq x-toolkit-scroll-bars '(xaw xaw3d))) | 69 | (memq x-toolkit-scroll-bars '(xaw xaw3d))) |