summaryrefslogtreecommitdiff
path: root/lisp/dframe.el
diff options
context:
space:
mode:
authorRomain Francoise <romain@orebokech.com>2005-11-30 19:40:13 +0000
committerRomain Francoise <romain@orebokech.com>2005-11-30 19:40:13 +0000
commit8a2c27b96c3650af79b2cf436eca75da849f2549 (patch)
tree917cbe3ecaab4e9139521aba2c1f789cddd0459d /lisp/dframe.el
parent7854b2a3f2dabe13e958f4e0ed72272fbfc70180 (diff)
downloademacs-8a2c27b96c3650af79b2cf436eca75da849f2549.tar.gz
(dframe-reposition-frame-emacs): Fix position computation for 'left
location. Update copyright year.
Diffstat (limited to 'lisp/dframe.el')
-rw-r--r--lisp/dframe.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/dframe.el b/lisp/dframe.el
index 4be0ee8f097..56bbdc36c01 100644
--- a/lisp/dframe.el
+++ b/lisp/dframe.el
@@ -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 @@ a cons cell indicationg a position of the form (LEFT . TOP)."
(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