From 641f5cbd00dcad6973ef8def210ffbe0cbd96c3f Mon Sep 17 00:00:00 2001
From: Galen Charlton <gmc@esilibrary.com>
Date: Wed, 26 Aug 2009 19:00:28 +0000
Subject: [PATCH] declare expand_barcode to be STABLE

As noticed by Jason, doing this gives a signficant
performance boost.
---
 sql/base/base.sql |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/sql/base/base.sql b/sql/base/base.sql
index 6ae7e39..3c12cc3 100644
--- a/sql/base/base.sql
+++ b/sql/base/base.sql
@@ -593,4 +593,4 @@ CREATE OR REPLACE FUNCTION migration_tools.expand_barcode (TEXT, TEXT, INTEGER,
     return $barcode if (length($prefix) + length($new_barcode) + length($suffix)) > $maxlen;
 
     return "$prefix$new_barcode$suffix";
-$$ LANGUAGE PLPERL;
+$$ LANGUAGE PLPERL STABLE;
-- 
1.7.2.5