From 8d82c2cd6b43b981a15bc205cb989ca34aeac7ea Mon Sep 17 00:00:00 2001 From: Henri-Damien LAURENT Date: Fri, 1 Aug 2008 10:18:10 +0200 Subject: [PATCH] Minor Feature : username when cataloguing biblios can now be added librarian name automatically when cataloguing. add "user" in the Default value of the biblio Signed-off-by: Henri-Damien LAURENT --- cataloguing/addbiblio.pl | 3 +++ 1 file changed, 3 insertions(+) diff --git a/cataloguing/addbiblio.pl b/cataloguing/addbiblio.pl index 0773f2eb4f..aa71a91611 100755 --- a/cataloguing/addbiblio.pl +++ b/cataloguing/addbiblio.pl @@ -308,6 +308,9 @@ sub create_input { $value =~ s/YYYY/$year/g; $value =~ s/MM/$month/g; $value =~ s/DD/$day/g; + my $username=(C4::Context->userenv?C4::Context->userenv->{'surname'}:"superlibrarian"); + $value=~s/user/$username/g; + } my $dbh = C4::Context->dbh; -- 2.39.5