diff options
| author | Po Lu | 2023-02-23 21:49:02 +0800 |
|---|---|---|
| committer | Po Lu | 2023-02-23 21:49:02 +0800 |
| commit | 0b7d9bbc8ace172ce5602f78c9b3357f754052d9 (patch) | |
| tree | ff4f3cc9a6a767d7ca822bf9f0d5cada77cd25f0 /src | |
| parent | e3595debd0c7e2c82a71c272eb8b6729ba426023 (diff) | |
| download | emacs-0b7d9bbc8ace172ce5602f78c9b3357f754052d9.tar.gz emacs-0b7d9bbc8ace172ce5602f78c9b3357f754052d9.zip | |
Make sure scroll-bar.el is loaded on Android
* lisp/loadup.el: Update commentary.
* src/androidterm.c (syms_of_androidterm): Define
Vx_toolkit_scroll_bars.
* src/xterm.c (syms_of_xterm): Update doc string.xf64
Diffstat (limited to 'src')
| -rw-r--r-- | src/androidterm.c | 5 | ||||
| -rw-r--r-- | src/xterm.c | 4 |
2 files changed, 8 insertions, 1 deletions
diff --git a/src/androidterm.c b/src/androidterm.c index 0701ef44436..07d9f90a356 100644 --- a/src/androidterm.c +++ b/src/androidterm.c | |||
| @@ -5570,6 +5570,11 @@ If set to a non-float value, there will be no wait at all. */); | |||
| 5570 | This is a string that uniquely identifies the version of Android | 5570 | This is a string that uniquely identifies the version of Android |
| 5571 | Emacs is running on. */); | 5571 | Emacs is running on. */); |
| 5572 | 5572 | ||
| 5573 | /* Only defined so loadup.el loads scroll-bar.el. */ | ||
| 5574 | DEFVAR_LISP ("x-toolkit-scroll-bars", Vx_toolkit_scroll_bars, | ||
| 5575 | doc: /* SKIP: real doc in xterm.c. */); | ||
| 5576 | Vx_toolkit_scroll_bars = Qnil; | ||
| 5577 | |||
| 5573 | /* Avoid dumping Vandroid_build_fingerprint. */ | 5578 | /* Avoid dumping Vandroid_build_fingerprint. */ |
| 5574 | pdumper_do_now_and_after_load (android_set_build_fingerprint); | 5579 | pdumper_do_now_and_after_load (android_set_build_fingerprint); |
| 5575 | 5580 | ||
diff --git a/src/xterm.c b/src/xterm.c index e191f7a6a77..5e6378db30d 100644 --- a/src/xterm.c +++ b/src/xterm.c | |||
| @@ -31955,7 +31955,9 @@ adjusted if the default value does not work for whatever reason. */); | |||
| 31955 | A value of nil means Emacs doesn't use toolkit scroll bars. | 31955 | A value of nil means Emacs doesn't use toolkit scroll bars. |
| 31956 | With the X Window system, the value is a symbol describing the | 31956 | With the X Window system, the value is a symbol describing the |
| 31957 | X toolkit. Possible values are: gtk, motif, xaw, or xaw3d. | 31957 | X toolkit. Possible values are: gtk, motif, xaw, or xaw3d. |
| 31958 | With MS Windows, Haiku windowing or Nextstep, the value is t. */); | 31958 | With MS Windows, Haiku windowing or Nextstep, the value is t. |
| 31959 | With Android, the value is nil, but that is because Emacs on | ||
| 31960 | Android does not support scroll bars at all. */); | ||
| 31959 | #ifdef USE_TOOLKIT_SCROLL_BARS | 31961 | #ifdef USE_TOOLKIT_SCROLL_BARS |
| 31960 | #ifdef USE_MOTIF | 31962 | #ifdef USE_MOTIF |
| 31961 | Vx_toolkit_scroll_bars = intern_c_string ("motif"); | 31963 | Vx_toolkit_scroll_bars = intern_c_string ("motif"); |