Mercurial > hg > xemacs-beta
comparison src/scrollbar.c @ 2286:04bc9d2f42c7
[xemacs-hg @ 2004-09-20 19:18:55 by james]
Mark all unused parameters as unused. Also eliminate some unneeded local
variables.
author | james |
---|---|
date | Mon, 20 Sep 2004 19:20:08 +0000 |
parents | a19b0eb5dfc1 |
children | 3de172a37a93 |
comparison
equal
deleted
inserted
replaced
2285:914c5afaac33 | 2286:04bc9d2f42c7 |
---|---|
435 | 435 |
436 int new_line_increment = -1, new_page_increment = -1; | 436 int new_line_increment = -1, new_page_increment = -1; |
437 int new_minimum = -1, new_maximum = -1; | 437 int new_minimum = -1, new_maximum = -1; |
438 int new_slider_size = -1, new_slider_position = -1; | 438 int new_slider_size = -1, new_slider_position = -1; |
439 int new_width = -1, new_height = -1, new_x = -1, new_y = -1; | 439 int new_width = -1, new_height = -1, new_x = -1, new_y = -1; |
440 #if 0 | |
440 struct window *new_window = 0; /* #### currently unused */ | 441 struct window *new_window = 0; /* #### currently unused */ |
442 #endif | |
441 | 443 |
442 end_pos = BUF_Z (b) - w->window_end_pos[CURRENT_DISP]; | 444 end_pos = BUF_Z (b) - w->window_end_pos[CURRENT_DISP]; |
443 sb_pos = scrollbar_point (w, 0); | 445 sb_pos = scrollbar_point (w, 0); |
444 start_pos = sb_pos; | 446 start_pos = sb_pos; |
445 | 447 |
526 new_minimum = BUF_BEGV (b); | 528 new_minimum = BUF_BEGV (b); |
527 new_maximum = max (BUF_ZV (b), new_minimum + 1); | 529 new_maximum = max (BUF_ZV (b), new_minimum + 1); |
528 new_slider_size = min ((end_pos - start_pos), | 530 new_slider_size = min ((end_pos - start_pos), |
529 (new_maximum - new_minimum)); | 531 (new_maximum - new_minimum)); |
530 new_slider_position = sb_pos; | 532 new_slider_position = sb_pos; |
533 #if 0 | |
531 new_window = w; | 534 new_window = w; |
535 #endif | |
532 } | 536 } |
533 } | 537 } |
534 else if (!MINI_WINDOW_P (w)) | 538 else if (!MINI_WINDOW_P (w)) |
535 { | 539 { |
536 /* The minus one is to account for the truncation glyph. */ | 540 /* The minus one is to account for the truncation glyph. */ |
618 unbind_to (depth); | 622 unbind_to (depth); |
619 } | 623 } |
620 } | 624 } |
621 | 625 |
622 static void | 626 static void |
623 vertical_scrollbar_changed_in_window (Lisp_Object specifier, | 627 vertical_scrollbar_changed_in_window (Lisp_Object UNUSED (specifier), |
624 struct window *w, | 628 struct window *w, |
625 Lisp_Object oldval) | 629 Lisp_Object UNUSED (oldval)) |
626 { | 630 { |
627 /* Hold on your cerebella guys. If we always show the dividers, | 631 /* Hold on your cerebella guys. If we always show the dividers, |
628 changing scrollbar affects only how the text and scrollbar are | 632 changing scrollbar affects only how the text and scrollbar are |
629 laid out in the window. If we do not want the dividers to show up | 633 laid out in the window. If we do not want the dividers to show up |
630 always, then we mark more drastic change, because changing | 634 always, then we mark more drastic change, because changing |
640 } | 644 } |
641 | 645 |
642 /* This function is called as a result of a change to the | 646 /* This function is called as a result of a change to the |
643 `scrollbar-pointer' glyph. */ | 647 `scrollbar-pointer' glyph. */ |
644 static void | 648 static void |
645 scrollbar_pointer_changed_in_window (Lisp_Object specifier, struct window *w, | 649 scrollbar_pointer_changed_in_window (Lisp_Object UNUSED (specifier), |
646 Lisp_Object oldval) | 650 struct window *w, |
651 Lisp_Object UNUSED (oldval)) | |
647 { | 652 { |
648 struct frame *f = XFRAME (WINDOW_FRAME (w)); | 653 struct frame *f = XFRAME (WINDOW_FRAME (w)); |
649 | 654 |
650 if (f->init_finished) | 655 if (f->init_finished) |
651 MAYBE_FRAMEMETH (f, scrollbar_pointer_changed_in_window, (w)); | 656 MAYBE_FRAMEMETH (f, scrollbar_pointer_changed_in_window, (w)); |