diff lisp/prim/tabify.el @ 2:ac2d302a0011 r19-15b2

Import from CVS: tag r19-15b2
author cvs
date Mon, 13 Aug 2007 08:46:35 +0200
parents 376386a54a3c
children 0132846995bd
line wrap: on
line diff
--- a/lisp/prim/tabify.el	Mon Aug 13 08:45:53 2007 +0200
+++ b/lisp/prim/tabify.el	Mon Aug 13 08:46:35 2007 +0200
@@ -18,9 +18,10 @@
 
 ;; You should have received a copy of the GNU General Public License
 ;; along with XEmacs; see the file COPYING.  If not, write to the Free
-;; Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
+;; Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+;; 02111-1307, USA.
 
-;;; Synched up with: FSF 19.30.
+;;; Synched up with: FSF 19.34.
 
 ;;; Commentary:
 
@@ -47,6 +48,7 @@
 		(indent-tabs-mode nil))
 	    (skip-chars-backward "\t" start)
 	    (delete-region tab-beg (point))
+	    ;; XEmacs change -- show progress
 	    (indent-to column)
 	    (if (> (/ (* 100 (- (point) start)) (- (point-max) start)) percent)
 		(progn
@@ -76,6 +78,7 @@
 	  (let ((column (current-column))
 		(indent-tabs-mode t))
 	    (delete-region (match-beginning 0) (point))
+	    ;; XEmacs change -- show progress
 	    (indent-to column)
 	    (if (> (/ (* 100 (- (point) start)) (- (point-max) start)) percent)
 		(progn