Revision 4b1c7617
Von Moritz Bunkus vor fast 18 Jahren hinzugefügt
| SL/AM.pm | ||
|---|---|---|
| 2423 | 2423 |
qq|ORDER BY sortkey | . ($dir eq "down" ? "ASC" : "DESC") . qq| LIMIT 1|; |
| 2424 | 2424 |
my ($sortkey_2) = selectrow_query($form, $dbh, $query, $sortkey_1, $unit_type); |
| 2425 | 2425 |
|
| 2426 |
$main::lxdebug->message(0, "name1 $name_1 dir $dir sk1 $sortkey_1 sk2 $sortkey_2"); |
|
| 2427 |
|
|
| 2428 | 2426 |
if (defined($sortkey_1)) {
|
| 2429 | 2427 |
$query = qq|SELECT name FROM units WHERE sortkey = ${sortkey_2}|;
|
| 2430 | 2428 |
my ($name_2) = selectrow_query($form, $dbh, $query); |
Auch abrufbar als: Unified diff
Debugmeldungen