From 1c80b98b612800b72cc76eb4c91c80e22fc3e61c Mon Sep 17 00:00:00 2001
From: Jay Belanger <jay.p.belanger@gmail.com>
Date: Wed, 24 Nov 2004 06:00:30 +0000
Subject: [PATCH] Add comment.

---
 lisp/calc/calc-sel.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/lisp/calc/calc-sel.el b/lisp/calc/calc-sel.el
index 05ea6b82993..5eabeeeda39 100644
--- a/lisp/calc/calc-sel.el
+++ b/lisp/calc/calc-sel.el
@@ -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
-- 
2.39.5