From 2264b40f9ab29fd231d56db51939fd878c4130de Mon Sep 17 00:00:00 2001
From: Leendert Bottelberghs <bottelberghs@webgui-cvs>
Date: Wed, 8 Sep 2004 10:17:53 +0000
Subject: [PATCH] bugfix [ 1024275 ] Drag and drop not working.

---
 lib/WebGUI/Operation/Page.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/WebGUI/Operation/Page.pm b/lib/WebGUI/Operation/Page.pm
index a786ce6c2..f83245068 100644
--- a/lib/WebGUI/Operation/Page.pm
+++ b/lib/WebGUI/Operation/Page.pm
@@ -916,7 +916,7 @@ sub www_rearrangeWobjects {
 		my @sequence = split(",",$position);
 		my $sequenceNumber = 1;
 		foreach my $wobjectId (@sequence) {
-			$wobjectId =~ s/td(\S+)/$1/;
+			$wobjectId =~ s/td(\d+|\S+)/$1/;
 			WebGUI::SQL->setRow("wobject","wobjectId",{
 				wobjectId=>$wobjectId,
 				sequenceNumber=>$sequenceNumber,