692 |
'(start-and-end-in-region negate-in-region) 'priority) |
'(start-and-end-in-region negate-in-region) 'priority) |
693 |
(setq inner-priority (car prios) outer-priority (cdr prios)) |
(setq inner-priority (car prios) outer-priority (cdr prios)) |
694 |
(cond ((and inner-priority (not outer-priority)) |
(cond ((and inner-priority (not outer-priority)) |
695 |
(+ inner-priority TeX-fold-priority-step)) |
(+ inner-priority TeX-overlay-priority-step)) |
696 |
((and (not inner-priority) outer-priority) |
((and (not inner-priority) outer-priority) |
697 |
(/ outer-priority 2)) |
(/ outer-priority 2)) |
698 |
((and inner-priority outer-priority) |
((and inner-priority outer-priority) |