From ff39065b415cf1f664f2d80789039b0b9bdfd88d Mon Sep 17 00:00:00 2001
From: fukachan <fukachan>
Date: Mon, 22 Oct 2001 15:59:31 +0000
Subject: oops back to 1.22 (save $id info in PCB) in some sense:
 $self->_pcb_set_id($curproc, $id) -> $pcb->set('article', 'id', $id)

---
 fml/lib/FML/Ticket/Model/minimal_states.pm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/fml/lib/FML/Ticket/Model/minimal_states.pm b/fml/lib/FML/Ticket/Model/minimal_states.pm
index 162a9a43..f6cc96c9 100644
--- a/fml/lib/FML/Ticket/Model/minimal_states.pm
+++ b/fml/lib/FML/Ticket/Model/minimal_states.pm
@@ -128,6 +128,7 @@ sub assign
     my $config  = $curproc->{ config };
     my $header  = $curproc->{ incoming_message }->{ header };
     my $subject = $header->get('subject');
+    my $pcb     = $curproc->{ pcb };
 
     use FML::Header::Subject;
     my $is_reply      = FML::Header::Subject->is_reply( $subject );
@@ -179,6 +180,8 @@ sub assign
 	# O.K. rewrite Subject: of the article to distribute
 	unless ($self->error) {
 	    my $header = $curproc->{ article }->{ header };
+
+	    $pcb->set('article', 'id', $id); # save $id info in PCB
 	    $self->_rewrite_header($header, $config, $id);
 	    $self->_set_status_info("newly assigned");
 	}
-- 
cgit v1.2.1