scsh-conservatory
/
sunet
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

right-justify ids

This commit is contained in:
interp 2003-01-16 12:58:01 +00:00
parent 422a1db09f
commit c02cb068af
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
scheme/httpd/surflets/web-server/root/surflets/admin-servlets.scm
View File

@ -185,7 +185,7 @@
(let ((session-id (car session-pair))
(session-entry (cdr session-pair)))
`((td ,(session-servlet-name session-entry))
(td ,session-id))))
(td (@ (align "right")) ,session-id))))
actions
footer)
(if (not action)
@ -297,7 +297,7 @@
current-continuations
(lambda (continuation-pair)
(let ((continuation-id (car continuation-pair)))
`((td ,continuation-id))))
`((td (@ (align "right")) ,continuation-id))))
actions
footer)
(if (not action)