Update of /cvsroot/sandweb/sandweb/bin
In directory usw-pr-cvs1:/tmp/cvs-serv3626/bin
Modified Files:
sandweb.cgi
Log Message:
ok, some of the basic framework is there for supporting alpha/reverse alpha
sorting, need to keep state of the last one though. I'm going to leave it here
for tonite.
Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.256
retrieving revision 1.257
diff -U2 -r1.256 -r1.257
--- sandweb.cgi 7 Mar 2002 08:37:14 -0000 1.256
+++ sandweb.cgi 7 Mar 2002 09:15:53 -0000 1.257
@@ -183,4 +183,5 @@
module_name => $module_name,
repo_name => $repo_name,
+ sort => CGI::param('sort'),
);
}
@@ -553,4 +554,5 @@
my $users_dir = $config->{'paths'}->{'users_dir'} || '';
my $repo_name = $args{'repo_name'};
+ my $sort = $args{'sort'};
my $repo_server = $user->get_repo_server(repo => $repo_name);
@@ -590,4 +592,5 @@
'template_dir' => $template_dir,
'vcs_commands' => \@vcs_commands,
+ 'sort' => $sort,
'users_dir' => $users_dir,
'log_obj' => $log,
@@ -654,4 +657,5 @@
'repo_type' => $repo_type,
'repo_name' => $repo_name,
+ 'sort' => $sort,
);
@@ -663,7 +667,13 @@
}
+ $sort = 'alpha';
+
my $browser_menu = $ui->get_menu(
MENU => 'browse_module',
ENTRY_LOOP => \@loop_data,
+ MODULE_NAME => $module_name,
+ REPO_NAME => $repo_name,
+ LOCATION => $location,
+ SORT => $sort,
);
|