Commit 95512164 authored by Joel Rosdahl's avatar Joel Rosdahl

More space allocated for the "Unread" column.

parent 1274ce4a
......@@ -133,3 +133,6 @@
** En del strängar har rättats.
** configure-scriptet fungerar bättre för pratiga Emacsar.
** Kolumnen "Osett" i medlemslistningarna skapade av "Status (för)
möte" och "Status (för) person" klarar större tal.
2000-12-09 Joel Rosdahl <joel@rosdahl.net>
* commands2.el (kom-status-conf): More space allocated for the
"Unread" column.
(kom-status-person): Ditto.
* english-strings.el (lyskom-message): Ditto.
* swedish-strings.el (lyskom-message): Ditto.
2000-12-06 Joel Rosdahl <joel@rosdahl.net>
* edit-text.el (lyskom-edit-send-check-recipients): Ask if normal
......
......@@ -308,8 +308,8 @@ otherwise: the conference is read with lyskom-completing-read."
1)))
(lyskom-format-insert 'conf-membership-line
(if (zerop unread)
" "
(format "%7d " unread))
" "
(format "%9d " unread))
(member->pers-no member)
(lyskom-return-membership-type (member->membership-type member))
)
......@@ -472,7 +472,7 @@ otherwise: the conference is read with lyskom-completing-read."
1)))
(lyskom-format-insert
'pers-membership-line
(if (zerop unread) " " (format "%6d " unread))
(if (zerop unread) " " (format "%9d " unread))
(if (= (conf-stat->conf-no conf-stat)
(conf-stat->supervisor member-conf-stat))
(lyskom-get-string 'is-supervisor-mark)
......
......@@ -562,10 +562,10 @@ Read all about it at http://www.lysator.liu.se/history/")
(show-membership-info-q . "Show number of unreads? ")
(conf-has-these-members . "\n%#1M has the following members:\n")
(conf-has-no-members . "\n%#1M has no members.\n")
(member-list-header . "Last entered Unread Name\n\n")
(member-list-header . "Last entered Unread Name\n\n")
(secret-membership . "--- Secret line ---\n")
(conf-membership-line . "%#1s%#2M %#3s\n")
(conf-membership-line-2 . " Added %#1s by %#2P\n")
(conf-membership-line-2 . " Added %#1s by %#2P\n")
(pers-for-status . "Get status of which user? ")
(no-such-pers . "The user doesn't exist.\n")
(pers-status-record . "Status of user %#1P (%#2p)\n")
......@@ -590,9 +590,9 @@ Read all about it at http://www.lysator.liu.se/history/")
(show-membership-list-also-q . "List memberships? ")
(not-allowed-see-confs . "You are not permitted to see which conferences %#1P is a member of.\n")
(is-member-of . "\n%#1P is a member of the following conferences:\n")
(membership-list-header . "Last access Unread Conference\n\n")
(membership-list-header . "Last access Unread Conference\n\n")
(pers-membership-line . "%#1s%#2s%#3M %#4s\n")
(pers-membership-line-2 . " Added %#1s by %#2P\n")
(pers-membership-line-2 . " Added %#1s by %#2P\n")
(is-supervisor-mark . "O ")
(who-to-send-message-to . "Send message to whom? (%s) ")
(send-empty-message-p . "The message is empty. Send it anyway? ")
......
......@@ -544,10 +544,10 @@ i svensk datorhistoria. L
(show-membership-info-q . "Visa antalet olsta? ")
(conf-has-these-members . "\n%#1M har fljande medlemmar:\n")
(conf-has-no-members . "\n%#1M har inga medlemmar.\n")
(member-list-header . "Senast inne Osett Namn\n\n")
(member-list-header . "Senast inne Osett Namn\n\n")
(secret-membership . "*** Hemlig rad ***\n")
(conf-membership-line . "%#1s%#2M %#3s\n")
(conf-membership-line-2 . " Adderad %#1s av %#2P\n")
(conf-membership-line-2 . " Adderad %#1s av %#2P\n")
(pers-for-status . "Vem vill du se statusen fr? ")
(no-such-pers . "Det finns ingen sdan person.\n")
(pers-status-record . "Status fr person %#1P (%#2p)\n")
......@@ -572,9 +572,9 @@ i svensk datorhistoria. L
(show-membership-list-also-q . "Vill du se vilka mten personen r medlem i ocks? ")
(not-allowed-see-confs . "Du fr inte se vilka mten %#1P r medlem i.\n")
(is-member-of . "\n%#1P r medlem i fljande mten:\n")
(membership-list-header . "Senast inne Osett Namn\n\n")
(membership-list-header . "Senast inne Osett Namn\n\n")
(pers-membership-line . "%#1s%#2s%#3M %#4s\n")
(pers-membership-line-2 . " Adderad %#1s av %#2P\n")
(pers-membership-line-2 . " Adderad %#1s av %#2P\n")
(is-supervisor-mark . "O ")
(who-to-send-message-to . "Vem vill du skicka meddelandet till? (%s) ")
(send-empty-message-p . "Meddelandet r tomt. Vill du nd skicka det? ")
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment