/[emacs]/emacs/lisp/electric.el
ViewVC logotype

Diff of /emacs/lisp/electric.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.18.8.1 by miles, Fri Apr 4 06:20:04 2003 UTC revision 1.18.8.2 by miles, Tue Oct 14 23:51:00 2003 UTC
# Line 160  Line 160 
160        (cond ((and (eq (window-buffer win) buf))        (cond ((and (eq (window-buffer win) buf))
161               (select-window win))               (select-window win))
162              (one-window              (one-window
              (goto-char (window-start win))  
163               (pop-to-buffer buffer)               (pop-to-buffer buffer)
164               (setq win (selected-window))               (setq win (selected-window))
165               (enlarge-window (- target-height (window-height win))))               (enlarge-window (- target-height (window-height win))))
# Line 175  Line 174 
174    
175  (provide 'electric)  (provide 'electric)
176    
177    ;;; arch-tag: dae045eb-dc2d-4fb7-9f27-9cc2ce277be8
178  ;;; electric.el ends here  ;;; electric.el ends here

Legend:
Removed from v.1.18.8.1  
changed lines
  Added in v.1.18.8.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26