From 699f1de4842d7939d13ddd37b6b2756b36665189 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Wed, 4 May 2005 09:33:09 +0000
Subject: [PATCH] use new pkg_svc.pkgsvcnum primary key when modifying pkg_svc
 records, closes: Bug#1221

---
 FS/FS/part_pkg.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/FS/FS/part_pkg.pm b/FS/FS/part_pkg.pm
index 182be87ea..bf040c8e5 100644
--- a/FS/FS/part_pkg.pm
+++ b/FS/FS/part_pkg.pm
@@ -375,6 +375,7 @@ sub replace {
     next unless $old_quantity != $quantity || $old_primary_svc ne $primary_svc;
   
     my $new_pkg_svc = new FS::pkg_svc( {
+      'pkgsvcnum'   => ( $old_pkg_svc ? $old_pkg_svc->pkgsvcnum : '' ),
       'pkgpart'     => $new->pkgpart,
       'svcpart'     => $part_svc->svcpart,
       'quantity'    => $quantity, 
-- 
2.11.0