Mercurial > emacs

changeset 67226:fd62535b63a8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(dframe-reposition-frame-emacs): Fix position computation for 'left location. Update copyright year.
author Romain Francoise <romain@orebokech.com>
date Wed, 30 Nov 2005 19:40:13 +0000
parents 371499b11b3c
children d02e0d3b5db9
files lisp/ChangeLog lisp/dframe.el
diffstat 2 files changed, 8 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Wed Nov 30 19:06:42 2005 +0000
+++ b/lisp/ChangeLog	Wed Nov 30 19:40:13 2005 +0000
@@ -1,3 +1,9 @@
+2005-11-30  Romain Francoise  <romain@orebokech.com>
+
+	* dframe.el (dframe-reposition-frame-emacs): Fix position
+	computation for 'left location.
+	Update copyright year.
+
 2005-11-30  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* help.el (help-map): Move initialization into declaration.
--- a/lisp/dframe.el	Wed Nov 30 19:06:42 2005 +0000
+++ b/lisp/dframe.el	Wed Nov 30 19:40:13 2005 +0000
@@ -1,6 +1,6 @@
 ;;; dframe --- dedicate frame support modes
 
-;;; Copyright (C) 1996, 97, 98, 99, 2000, 01, 02, 03, 04 Free Software Foundation
+;;; Copyright (C) 1996, 97, 98, 99, 2000, 01, 02, 03, 04, 05 Free Software Foundation
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 ;; Keywords: file, tags, tools
@@ -509,7 +509,7 @@
 	     (setq newleft (+ pfx pfw 5)
 		   newtop pfy))
 	    ((eq location 'left)
-	     (setq newleft (+ pfx 10 nfw)
+	     (setq newleft (- pfx 10 nfw)
 		   newtop pfy))
 	    ((eq location 'left-right)
 	     (setq newleft