Mercurial > emacs
changeset 58466:bf2edad57436
Add comment.
author | Jay Belanger <jay.p.belanger@gmail.com> |
---|---|
date | Wed, 24 Nov 2004 06:00:30 +0000 |
parents | 02afd0c73e8e |
children | 4a905282edbb |
files | lisp/calc/calc-sel.el |
diffstat | 1 files changed, 5 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calc/calc-sel.el Wed Nov 24 05:59:23 2004 +0000 +++ b/lisp/calc/calc-sel.el Wed Nov 24 06:00:30 2004 +0000 @@ -3,8 +3,7 @@ ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc. ;; Author: David Gillespie <daveg@synaptics.com> -;; Maintainers: D. Goel <deego@gnufans.org> -;; Colin Walters <walters@debian.org> +;; Maintainer: Jay Belanger <belanger@truman.edu> ;; This file is part of GNU Emacs. @@ -416,6 +415,10 @@ (setcar x (list 'cplx (car x) 0)) (calc-encase-atoms-rec (car x))))))) +;; The variable math-comp-sel-tag is local to calc-find-selected-part, +;; but is used by math-comp-sel-flat-term and math-comp-add-string-sel +;; in calccomp.el, which are called (indirectly) by calc-find-selected-part. + (defun calc-find-selected-part () (let* ((math-comp-sel-hpos (- (current-column) calc-selection-cache-offset)) toppt