|
Revision 45, 449 bytes
(checked in by jm3, 2 years ago)
|
- added additional config file variable and removed some hardcoded references to the root dir.
- Nb. there are *still* some hardcoded paths inside the perl file... *we have* to fix these before we can beta!!!
- added additional error dump to gm script
|
- Property svn:executable set to
*
- Property svn:keywords set to
Id
|
| Line | |
|---|
| 1 |
#!/bin/bash |
|---|
| 2 |
# $Id$ |
|---|
| 3 |
|
|---|
| 4 |
# pull in config params like KEY_HOME, GPG_HOME, and app ROOT |
|---|
| 5 |
. configure.sh |
|---|
| 6 |
|
|---|
| 7 |
echo Content-type: text/HTML |
|---|
| 8 |
echo |
|---|
| 9 |
echo |
|---|
| 10 |
|
|---|
| 11 |
echo "<select value='key_id'>" |
|---|
| 12 |
/sw/bin/gpg --list-secret-keys --no-permission-warning --load-extension idea --homedir $KEY_HOME | grep '^sec' \ |
|---|
| 13 |
| sed "s:^sec .*/::" \ |
|---|
| 14 |
| sed "s/^\([0-9A-F]*\) \(.*\)$/<option value='\1'>\1 \/ \2<\/option>/" \ |
|---|
| 15 |
| sed "s:\(-[0-9][0-9] \):\1 / :" |
|---|
| 16 |
ret_val=$? |
|---|
| 17 |
echo "</select>" |
|---|
| 18 |
echo |
|---|
