Mercurial > hg > xemacs-beta
comparison src/scrollbar.c @ 16:0293115a14e9 r19-15b91
Import from CVS: tag r19-15b91
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:49:20 +0200 |
parents | ac2d302a0011 |
children | 859a2309aef8 |
comparison
equal
deleted
inserted
replaced
15:ad457d5f7d04 | 16:0293115a14e9 |
---|---|
723 CHECK_LIVE_WINDOW (window); | 723 CHECK_LIVE_WINDOW (window); |
724 /* Motif and Athena scrollbars behave differently, but in accordance | 724 /* Motif and Athena scrollbars behave differently, but in accordance |
725 with their standard behaviors. It is not possible to hide the | 725 with their standard behaviors. It is not possible to hide the |
726 differences down in lwlib because knowledge of XEmacs buffer and | 726 differences down in lwlib because knowledge of XEmacs buffer and |
727 cursor motion routines is necessary. */ | 727 cursor motion routines is necessary. */ |
728 #if defined (LWLIB_SCROLLBARS_MOTIF) || defined (LWLIB_SCROLLBARS_LUCID) | 728 #if defined (LWLIB_SCROLLBARS_MOTIF) || defined (LWLIB_SCROLLBARS_LUCID) || \ |
729 defined (LWLIB_SCROLLBARS_ATHENA3D) | |
729 window_scroll (window, Qnil, -1, ERROR_ME_NOT); | 730 window_scroll (window, Qnil, -1, ERROR_ME_NOT); |
730 #else /* Athena */ | 731 #else /* Athena */ |
731 { | 732 { |
732 Bufpos bufpos; | 733 Bufpos bufpos; |
733 Lisp_Object value = Fcdr (object); | 734 Lisp_Object value = Fcdr (object); |
765 CHECK_LIVE_WINDOW (window); | 766 CHECK_LIVE_WINDOW (window); |
766 /* Motif and Athena scrollbars behave differently, but in accordance | 767 /* Motif and Athena scrollbars behave differently, but in accordance |
767 with their standard behaviors. It is not possible to hide the | 768 with their standard behaviors. It is not possible to hide the |
768 differences down in lwlib because knowledge of XEmacs buffer and | 769 differences down in lwlib because knowledge of XEmacs buffer and |
769 cursor motion routines is necessary. */ | 770 cursor motion routines is necessary. */ |
770 #if defined (LWLIB_SCROLLBARS_MOTIF) || defined (LWLIB_SCROLLBARS_LUCID) | 771 #if defined (LWLIB_SCROLLBARS_MOTIF) || defined (LWLIB_SCROLLBARS_LUCID) || \ |
772 defined (LWLIB_SCROLLBARS_ATHENA3D) | |
771 window_scroll (window, Qnil, 1, ERROR_ME_NOT); | 773 window_scroll (window, Qnil, 1, ERROR_ME_NOT); |
772 #else /* Athena */ | 774 #else /* Athena */ |
773 { | 775 { |
774 Lisp_Object value = Fcdr (object); | 776 Lisp_Object value = Fcdr (object); |
775 CHECK_INT (value); | 777 CHECK_INT (value); |