diff options
| author | jeff <jeff> | 2007-02-12 17:56:52 +0000 |
|---|---|---|
| committer | jeff <jeff> | 2007-02-12 17:56:52 +0000 |
| commit | 2f7205c859dd4d36aaa86c11e98ec1b48f4cc34b (patch) | |
| tree | d88fedb7a21358b175fee7df138659f800b6450a /FS | |
| parent | 9c90d9596b2fce8744d0851443444b3a4f846297 (diff) | |
alpha sort packages in new package order SELECT (ticket 1446)
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/ClientAPI/Signup.pm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/FS/FS/ClientAPI/Signup.pm b/FS/FS/ClientAPI/Signup.pm index 5a8f8e168..ac211ec27 100644 --- a/FS/FS/ClientAPI/Signup.pm +++ b/FS/FS/ClientAPI/Signup.pm @@ -201,6 +201,10 @@ sub signup_info { # delete $signup_info->{'part_pkg'}; #} + $signup_info->{'part_pkg'} = [ sort { $a->{pkg} cmp $b->{pkg} } # case? + @{ $signup_info->{'part_pkg'} } + ]; + if ( exists $packet->{'session_id'} ) { my $agent_signup_info = { %$signup_info }; delete $agent_signup_info->{agentnum2part_pkg}; |