From 615467064677d0a609feca6504b59c563c160638 Mon Sep 17 00:00:00 2001
From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Tue, 26 Feb 2008 01:09:38 +0000
Subject: [PATCH] aded username fleshing to single picklist retrieval

git-svn-id: svn://svn.open-ils.org/ILS/branches/acq-experiment@8834 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 Open-ILS/src/perlmods/OpenILS/Application/Acq/Picklist.pm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Picklist.pm b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Picklist.pm
index 657a5150cd..3af3027bbc 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Picklist.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Picklist.pm
@@ -96,6 +96,9 @@ sub retrieve_picklist {
             $e->allowed('VIEW_PICKLIST', undef, $picklist);
     }
 
+    $picklist->owner($e->retrieve_actor_user($picklist->owner)->usrname) 
+        if($$options{flesh_username});
+
     return $picklist;
 }
 
-- 
2.11.0