english-strings.el 67.7 KB
Newer Older
Linus Tolke's avatar
Linus Tolke committed
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
;;;;;
;;;;; $Id$
;;;;; Copyright (C) 1991  Lysator Academic Computer Association.
;;;;;
;;;;; This file is part of the LysKOM server.
;;;;; 
;;;;; LysKOM is free software; you can redistribute it and/or modify it
;;;;; under the terms of the GNU General Public License as published by 
;;;;; the Free Software Foundation; either version 1, or (at your option) 
;;;;; any later version.
;;;;; 
;;;;; LysKOM is distributed in the hope that it will be useful, but WITHOUT
;;;;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
;;;;; FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
;;;;; for more details.
;;;;; 
;;;;; You should have received a copy of the GNU General Public License
;;;;; along with LysKOM; see the file COPYING.  If not, write to
;;;;; Lysator, c/o ISY, Linkoping University, S-581 83 Linkoping, SWEDEN,
;;;;; or the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, 
;;;;; MA 02139, USA.
;;;;;
;;;;; Please mail bug reports to bug-lyskom@lysator.liu.se. 
;;;;;
;;;; ================================================================
;;;; ================================================================
;;;;
Linus Tolke's avatar
Linus Tolke committed
28
;;;; File: english-strings.el
Linus Tolke's avatar
Linus Tolke committed
29
30
31
;;;;
;;;; This file contains all strings in the LysKOM elisp client.
;;;; Language:     English.
32
;;;; Matches version 36.11 of swedish-strings.el
Linus Tolke's avatar
Linus Tolke committed
33
34
;;;; ================================================================
;;;;
35
36
;;;; Translation from swedish-strings.el: David Byers
;;;;
Linus Tolke's avatar
Linus Tolke committed
37
38
39
40


(setq lyskom-clientversion-long 
      (concat lyskom-clientversion-long
41
42
              "$Id$"))

Linus Tolke's avatar
Linus Tolke committed
43
44


45
46
47
48
49
50
51
52
;;; ================================================================
;;; lyskom-edit-mode-map                             English version

(defvar lyskom-edit-mode-map nil
  "Mode map for LysKOM edit.")

;;; Set the keymap for lyskom-edit-mode

53
54
55
(defvar lyskom-edit-prefix nil
  "Mode-map for lyskom edit mode")

56
57
58
(if lyskom-edit-mode-map
    nil
  (setq lyskom-edit-mode-map (make-sparse-keymap))
59
60
61
  (define-prefix-command 'lyskom-edit-prefix)
  (define-prefix-command 'lyskom-edit-review-prefix)
  (define-prefix-command 'lyskom-edit-insert-prefix)
62
63
64
65
66
67
68
69
70
71
72
  (define-key lyskom-edit-mode-map "\C-c"	'lyskom-edit-prefix)
  (define-key lyskom-edit-mode-map "\C-c?"	'lyskom-help)
  (define-key lyskom-edit-mode-map "\C-cr"	'lyskom-edit-review-prefix)
  (define-key lyskom-edit-mode-map "\C-ci"	'lyskom-edit-insert-prefix)
  (define-key lyskom-edit-mode-map "\C-c\C-c"	'kom-edit-send)
  (define-key lyskom-edit-mode-map "\C-ck"	'kom-edit-quit)
  (define-key lyskom-edit-mode-map "\C-c\C-k"	'kom-edit-quit)
  (define-key lyskom-edit-mode-map "\C-cr?"	'lyskom-help)
  (define-key lyskom-edit-mode-map "\C-crc"	'kom-edit-show-commented)
  (define-key lyskom-edit-mode-map "\C-ci?"	'lyskom-help)
  (define-key lyskom-edit-mode-map "\C-cic"	'kom-edit-insert-commented)
73
  (define-key lyskom-edit-mode-map "\C-ci\C-y"	'kom-edit-insert-commented)
74
75
76
77
78
79
80
81
82
83
  (define-key lyskom-edit-mode-map "\C-ci1"	'kom-edit-insert-digit-text)
  (define-key lyskom-edit-mode-map "\C-ci2"	'kom-edit-insert-digit-text)
  (define-key lyskom-edit-mode-map "\C-ci3"	'kom-edit-insert-digit-text)
  (define-key lyskom-edit-mode-map "\C-ci4"	'kom-edit-insert-digit-text)
  (define-key lyskom-edit-mode-map "\C-ci5"	'kom-edit-insert-digit-text)
  (define-key lyskom-edit-mode-map "\C-ci6"	'kom-edit-insert-digit-text)
  (define-key lyskom-edit-mode-map "\C-ci7"	'kom-edit-insert-digit-text)
  (define-key lyskom-edit-mode-map "\C-ci8"	'kom-edit-insert-digit-text)
  (define-key lyskom-edit-mode-map "\C-ci9"	'kom-edit-insert-digit-text)
  (define-key lyskom-edit-mode-map "\C-ci "	'kom-edit-insert-text)
84
  (define-prefix-command 'lyskom-edit-add-prefix)
85
86
87
88
89
90
91
92
93
94
95
96
97
98
  (define-key lyskom-edit-mode-map "\C-ca" 'lyskom-edit-add-prefix)
  (define-key lyskom-edit-mode-map "\C-car" 'kom-edit-add-recipient)
  (define-key lyskom-edit-mode-map "\C-cac" 'kom-edit-add-copy)
  (define-key lyskom-edit-mode-map "\C-ca?" 'lyskom-help))


(defvar lyskom-header-separator
  (substitute-command-keys
   "\\<lyskom-edit-mode-map>\
--- Write below. \
Post: \\[kom-edit-send], \
Kill: \\[kom-edit-quit], \
Help: \\[describe-mode] ---")
  "*String to separate headers from text body.")
Linus Tolke's avatar
Linus Tolke committed
99

100
101
(defvar lyskom-swascii-header-separator nil
  "The swascii version of lyskom-header-separator.")
Linus Tolke's avatar
Linus Tolke committed
102
103
104
105
106

(defvar lyskom-header-subject "Subject: "
  "*String to prompt for subject in the edit buffer.")


107
108
109
(defvar lyskom-swascii-header-subject nil
  "The swascii version of lyskom-header-subject.")

Linus Tolke's avatar
Linus Tolke committed
110
111
112
113
114
115
116
117
118
119
120
121
(defconst lyskom-strings 
  '(
    ; From vars.el: 
    ; From komtypes.el: nil
    ; From clienttypes.el: nil
    ; From startup.el:
    (server-q . "LysKOM server? (%#1s) ")
    (try-connect . "LysKOM elisp client version %#1s.\nAttempting to connect to %#2s.\n")
    (protocoll-error . "Protocol error. Servers says: %#1s")
    (connection-done . "Connection established. Server version is %#1s.\n\n")
    (what-is-your-name . "What is your name? ")
    (password . "Your Password? ")
122
123
124
    (wrong-password . "Incorrect password\n")
    (are-logged-in . "You have entered LysKOM. Please wait...\n")
    (you-have-motd . "\nYou have a note on your door:\n\n")
David Kågedal's avatar
David Kågedal committed
125
126
127
    (lyskom-motd-was-garbed . "\nThe login message does not exist!
The message that was supposed to be shown after login has disappeared.
Please contact the system administrator.\n")
128
    (presentation-encouragement .
129
130
"You have not written a presentation. Please write a presentation by using
the command Ap. If you do not want to write a presentations, please type fk.\n")
Linus Tolke's avatar
Linus Tolke committed
131
132

    (first-greeting . "%#1s
David Byers's avatar
David Byers committed
133
This appears to be the first time you use LysKOM. Welcome!
Linus Tolke's avatar
Linus Tolke committed
134
Please make sure you have spelled your name correctly. You should use your
135
full name and organisation, eg. \"Joe Hacker, MIT\". If your name is spelled
Linus Tolke's avatar
Linus Tolke committed
136
137
incorrectly, or you wish to change it, answer 'no' to the question below.

138
At present the LysKOM server stores most of the information so that
139
anybody can read it. Only passwords are encrypted.
Linus Tolke's avatar
Linus Tolke committed
140

141
If you ar uncertain about how to use LysKOM, you can retrieve a manual by
Linus Tolke's avatar
Linus Tolke committed
142
143
144
145
146
147
anonymous ftp to ftp.lysator.liu.se. Ask your system administrator for help
on how to do this.")

    (is-name-correct . "Is the name %#1s correct? ")
    (personal-password . "Enter a personal password: ")
    (repeat-password . "Repeat for confirmation: ")
David Byers's avatar
David Byers committed
148
    (repeat-failure . "The passwords were not the same.\n")
Linus Tolke's avatar
Linus Tolke committed
149

David Byers's avatar
David Byers committed
150
    (could-not-create-you .  "LysKOM couldn't create that user.\n")
Linus Tolke's avatar
Linus Tolke committed
151
152
153
    (presentation-subject . "%#1s")
    (presentation-form . "Name:\t\nAddress:\t\n\t\nTelephone:
Email-address:\n\nOther:\t")
154
    (presentation-help . "You are writing your presentation.\n")
Linus Tolke's avatar
Linus Tolke committed
155
    (not-present-anywhere . "Not in any conference.")
156
    (in-secret-conference . "Secret conference (%#1d).")
Linus Tolke's avatar
Linus Tolke committed
157
158
159
160
161
162
163
164



    ; From internal.el:
    (shaky-tcp . "At the moment I can't reach the server. The TCP/IP connection is shaky%#1s")
    (retrying-tcp . "Retrying.")

    ; From parse.el:
David Kågedal's avatar
David Kågedal committed
165
    (protocol-error . "protocol error: %s")
Linus Tolke's avatar
Linus Tolke committed
166
167

    ; From services.el:
David Kågedal's avatar
David Kågedal committed
168
    (interrupted . "Interrupted\n")
Linus Tolke's avatar
Linus Tolke committed
169
170
171
172
173

    ; From cache.el:
    ; No entries.

    ; From commands1.el:
174
175
176
177
178
179
180
181
182
183
184
185
186
187
    (appreciation . 
"You are a very special person, beautiful and wise, respected by
everybody around you. You are doing a splendid job. Many people love
you, body and soul. You make life easier for others. You are a very
warm and sensitive person.

Be proud of being You! You have a very good reason.\n\n")
    (abuse . 
"You are a nuisance, ugly and stupid, disrespected by everybody around
you. You are doing a worthless job. Many people hate you, body and
soul. You make life harder for others. You are a very cold and
unfeeling person.

Be ashamed of being You! You have a very good reason.\n\n")
Linus Tolke's avatar
Linus Tolke committed
188
189


190
    (what-conf-to-delete . "Conference/user to delete: ")
191
    (what-conf-to-change . "Conference to modify: ")
Linus Tolke's avatar
Linus Tolke committed
192
193
194
    (confirm-delete-pers-or-conf . "Really delete %#1s %#2s? ")
    (the-pers . "the user")
    (the-conf . "the conference")
195
    (deletion-not-confirmed . "Deletion aborted\n")
Linus Tolke's avatar
Linus Tolke committed
196
    (somebody-else-deleted-that-conf . "Somebody else just deleted the conference.\n")
197
    (conf-is-deleted . "OK, %#1s is now deleted.\n")
David Byers's avatar
David Byers committed
198
    (you-could-not-delete . "%#1M can't be deleted by you.\n")
Linus Tolke's avatar
Linus Tolke committed
199

200
    (what-text-to-delete . "Article to remove: ")
David Byers's avatar
David Byers committed
201
    (deleting-text . "Removing article %#1:n...")
Linus Tolke's avatar
Linus Tolke committed
202
203
204

    (presentation-for-whom . "Which conference/user: ")
    (somebody-deleted-that-conf . "Somebody just deleted that conference.\n")
David Kågedal's avatar
David Kågedal committed
205
206
    (review-presentation-of . "Review presentation of %#1M.\n")
    (has-no-presentation . "%#1M has no presentation.\n")
Linus Tolke's avatar
Linus Tolke committed
207
208
209

    (have-to-read . "You must read an article first.\n")

David Kågedal's avatar
David Kågedal committed
210
    (review-text-no . "Review article %#1n.\n")
Linus Tolke's avatar
Linus Tolke committed
211
212
    (no-comment-to . "There is no commented article.\n")

213
    (who-letter-to . "Send a letter to whom: ")
David Kågedal's avatar
David Kågedal committed
214
    (has-motd . "%#1P has a note on the door:\n\n")
Linus Tolke's avatar
Linus Tolke committed
215
216
    (motd-persist-q . "Send the letter? ")

217
218
    (who-to-add . "Whom do you want to add: ")
    (where-to-add . "To which conference: ")
David Kågedal's avatar
David Kågedal committed
219
    (where-to-add-self . "Join which conference: ")
Linus Tolke's avatar
Linus Tolke committed
220
221
222
223
    (priority-q . "Conference priority? (0 (low) - 255 (high)) ")
    (done . "done.\n")
    (nope . "didn't work.\n")

David Kågedal's avatar
David Kågedal committed
224
    (cant-find-supervisor . "Can't find supervisor of %#1M.\n")
David Byers's avatar
David Byers committed
225
226
    (is-read-protected-contact-supervisor . "%#1M \344r closed.
Send a letter to  %#2P to apply for membership.")
227

228
    (conf-does-not-exist . "\nThe conference doesn't exist.\n")
Linus Tolke's avatar
Linus Tolke committed
229

David Kågedal's avatar
David Kågedal committed
230
    (who-to-exclude . "Who do you want to remove: ")
231
    (where-from-exclude . "From which conference: ")
Linus Tolke's avatar
Linus Tolke committed
232

David Kågedal's avatar
David Kågedal committed
233
    (leave-what-conf . "Leave which conference: ")
Linus Tolke's avatar
Linus Tolke committed
234

235
236
    (error-fetching-person . "Error retreiving user.\n")
    (error-fetching-conf . "Error retreiving conference.\n")
Linus Tolke's avatar
Linus Tolke committed
237

238
    (name-of-conf . "Conference name: ")
David Kågedal's avatar
David Kågedal committed
239
    (anyone-member . "May anyone join? ")
Linus Tolke's avatar
Linus Tolke committed
240
    (secret-conf . "Secret conference? ")
241
    (comments-allowed . "Are comments allowed? ")
242
    (what-comment-no . "Comment article number: ")
Linus Tolke's avatar
Linus Tolke committed
243
244
    (confusion-what-to-comment . "I can't figure out which article you want to comment.\n")
    (confusion-what-to-footnote . "I can't figure out to which article you want to write a footnote to.\n")
245
    (what-private-no . "Private reply to article number: ")
Linus Tolke's avatar
Linus Tolke committed
246
247
248

    (confusion-who-to-reply-to . "I can't figure out which article you want to write a private reply to.\n")
    (confusion-what-to-answer-to . "I can't figure out which article you want write a reply to.")
249
    (quit-in-spite-of-unsent . "You have an unsent article. Do you really want to quit? ")
250
    (confusion-what-to-view . "I can't figure out which article you want to view.\n")
Linus Tolke's avatar
Linus Tolke committed
251
252
    (really-quit . "Do you really want to quit LysKOM? ")
    (session-ended . "
253
254
255
256
--------------------------------------------
  LysKOM session finished
  You are now disconnected from the server
--------------------------------------------\n")
257
258
259
260
261
    (session-auto-ended . "
============================================================
Disconnecting from LysKOM since all connections are in use
and you have finished reading. Please come back later.
============================================================\n\n")
262
    (what-to-change-pres-you . "Change presentation of who/what (yourself): ")
Linus Tolke's avatar
Linus Tolke committed
263
264
    (who-to-put-motd-for . "Post note on the door of who/what (yourself): ")

265
    (cant-get-conf-stat . "Cannot get the status of that conference.")
266
    (go-to-conf-p . "Go to conference: ")
David Kågedal's avatar
David Kågedal committed
267
    (want-become-member . "Do you want to join? ")
Linus Tolke's avatar
Linus Tolke committed
268
269
270
271
    (no-ok . "Okiedokie, whatever you say.\n")

    (who-to-remove-motd-for . "Remove note from the door of who/what: ")

272
    (conf-all-read . "%#1M - no unread articles.\n")
Linus Tolke's avatar
Linus Tolke committed
273
274
275
276
277
    (no-in-conf . "You are not present in any conference.\n")

    (search-for-pers . "Enter search key (RETURN for all users) ")
    (search-for-conf . "Enter search key (RETURN for all conferences) ")
    (name-to-be-changed . "Name to change: ")
278
    (no-such-conf-or-pers . "The conference or user doesn't exist.\n")
Linus Tolke's avatar
Linus Tolke committed
279
    (new-name . "New name: ")
280
281
    (who-to-change-supervisor-for . "Change supervisor of who/what: ")
    (new-supervisor . "New supervisor: ")
282
283
284
    (text-to-mark . "Mark which article: ")
    (text-to-unmark . "Unmark which article: ")
    (what-mark . "Set which mark: ")
David Byers's avatar
David Byers committed
285
286
    (unmarking-textno . "Unmarking article %#1n...")
    (marking-textno . "Marking article %#1n...")
Linus Tolke's avatar
Linus Tolke committed
287
288

    (new-passwd-again . "Repeat the new password for confirmation: ")
289
290
    (what-mark-to-view . "Review which mark: ")
    (whos-passwd . "Change password for whom (yourself): ")
Linus Tolke's avatar
Linus Tolke committed
291
292
293
    (old-passwd . "Your old password: ")
    (new-passwd . "Your new password: ")
    (changing-passwd . "Changing password...")
David Byers's avatar
David Byers committed
294
    (retype-dont-match . "You didn't reenter the same passwrod. Try again.\n")
Linus Tolke's avatar
Linus Tolke committed
295
296
297
298
299
    (palindrome . "(a palindrome!) ")
    (lyskom-name . "User")
    (is-in-conf . "In conference")
    (from-machine . "At")
    (is-doing . "Activity")
300
    (lyskom-client . "Client")
301
    (text-to-add-recipient . "Add recipient to which article: ")
302
    (text-to-add-copy . "Add recipient of carbon copy of which article: ")
303
304
305
    (text-to-delete-recipient . "Remove recipient from which article: ")
    (text-to-add-comment-to . "Add comment to which article: ")
    (text-to-delete-comment-from . "Remove comment from which article: ")
Linus Tolke's avatar
Linus Tolke committed
306

307
    (where-on-list-q . "Placement in your list? (0-%#1d) ")
David Kågedal's avatar
David Kågedal committed
308
    (member-in-conf . "Joining to %#1M...")
David Byers's avatar
David Byers committed
309
310
    (add-member-in . "Adding %#1P as a member of %#2M...")
    (unsubscribe-to . "Leaving %#1M...")
Linus Tolke's avatar
Linus Tolke committed
311

David Byers's avatar
David Byers committed
312
    (exclude-from . "Removing %#1P from %#2M...")
Linus Tolke's avatar
Linus Tolke committed
313

David Byers's avatar
David Byers committed
314
    (unsubscribe-failed . "\nDidn't work. Perhaps %#1P isn't a member of %#2M?\n")
Linus Tolke's avatar
Linus Tolke committed
315
316
317

    (You . "You")
    (could-not-create-conf . "Couldn't create the conference \"%#1s\".\nError: %#2d.\n")
David Byers's avatar
David Byers committed
318
319
    (created-conf-no-name . "Conference number %[%#3@%#1:m %#2:M%] has been created.\n")
    (cant-read-textno . "You are not allowed to read article %#1:n")
Linus Tolke's avatar
Linus Tolke committed
320

David Byers's avatar
David Byers committed
321
    (not-supervisor-for . "You are not the supervisor of %#1M.\n")
322
    (go-to-conf . "Go to conference %#1M.\n")
David Byers's avatar
David Byers committed
323
324
    (cant-go-to-his-mailbox . "You are not allowed to go to %#1M's mailbox.\n")
    (not-member-of-conf . "You are not a member of %#1M.\n")
David Kågedal's avatar
David Kågedal committed
325
    (about-to-change-name-from . "%#1P\n")
David Byers's avatar
David Byers committed
326
    (change-name-done . "Done. New name: %[%#2@%#1:M%].\n")
327
    (change-name-nope . "Didn't work. Error code %#3d. %#2s.\n")
David Byers's avatar
David Byers committed
328
    (change-supervisor-from-to . "Change supervisor of %#1M to %#2P...")
Linus Tolke's avatar
Linus Tolke committed
329
    (change-supervisor-nope . 
David Byers's avatar
David Byers committed
330
     "\nDidn't work. Perhaps you are not allowed to change the supervisor of %#1M?\n")
Linus Tolke's avatar
Linus Tolke committed
331
    
332
    (no-marked-texts . "You have not marked any articles.\n")
Linus Tolke's avatar
Linus Tolke committed
333
    (no-marked-texts-mark . 
334
     "You have not marked any articles with mark %#1d.\n")
David Kågedal's avatar
David Kågedal committed
335
336
337
338
339

    (weekdays . ["Sunday" "Monday" "Tuesday" "Wednesday" "Thursday"
		 "Friday" "Saturday" "Sunday"])
    (time-is . "The time is %#1s %#2s(according to the server).")
    (time-format-exact . "%#7s %4#1d-%02#2d-%02#3d %02#4d:%02#5d:%02#6d")
340
341
342
343
344
345
346

    (xmaseve . "Christmas eve!")
    (xmasday . "Christmas day.\nDid you get any nice gifts this year?")
    (newyearday . "\nMay %#1d be a prosperous and good year for you!")
    (newyeareve . "Happy New Year!")
    (newyearevelate . "Less than an hour to go...")

Linus Tolke's avatar
Linus Tolke committed
347
    (total-users . "    A total of %#1d users.\n")
348
    (who-to-add-q . "Add who/what as a recipient: ")
349
    (who-to-add-copy-q . "Add which conference/user as recipient of a carbon copy: ")
350
    (who-to-sub-q . "Remove who/what as a recipient: ")
351

352
353
    (adding-name-as-recipient . "Adding %#1M as recipient of article %#2n...")
    (adding-name-as-copy . "%#1M will receive a carbon copy of article %#2n...")
Linus Tolke's avatar
Linus Tolke committed
354
    (remove-name-as-recipient .
355
     "Removing %#1M as recipient of article %#2n...")
356
357
    (text-to-add-q . "Add which article as a comment: ")
    (text-to-remove-q . "Remove which article as a comment: ")
David Byers's avatar
David Byers committed
358
359
    (add-comment-to . "Adding article %#1n as a comment to text %#2n...")
    (sub-comment-to . "Removing article %#1n as a comment to article %#2n...")
360
    (comment-keep-recpt-p ."Should %#1s remain a recipient? ")
361
    (matching-regexp . "Conferences/users matching `%#1s'\n")
Linus Tolke's avatar
Linus Tolke committed
362
363
364

    ; From commands2.el:

David Kågedal's avatar
David Kågedal committed
365
    (your-memberships . "Your LysKOM conference memberships:\n")
Linus Tolke's avatar
Linus Tolke committed
366
    (memberships-header . "Last access	   Prio	Unread	Conference\n")
David Byers's avatar
David Byers committed
367
    (memberships-line . "%16#1s  %#2d\t%#3d\t%#4M\n")
Linus Tolke's avatar
Linus Tolke committed
368
    
369
    (conf-for-status . "Get status of which conference: ")
370
    (no-such-conf . "The conference doesn't exist.\n")
David Kågedal's avatar
David Kågedal committed
371
    (status-record . "Status of conference %#1M (%#2m) %#3s\n\n")
Linus Tolke's avatar
Linus Tolke committed
372
373
374
375
    (Mailbox . "Mailbox")
    (Protected . "Protected")
    (no-comments . "No comments")
    (closed . "Closed")
376
                   
David Byers's avatar
David Byers committed
377
    (created-by . "Created by person %24#1p %#3s(%#2P)\n")
378
    (created-at . "Created:%34#1s\n")
David Kågedal's avatar
David Kågedal committed
379
    (members .    "Number of members: %19#1d\n")
380
381
382
    (garb-nice . "Expiration time (in days):%16#1d\n")
    (lowest-local-no . "Lowest local number: %21#1d\n")
    (highest-local-no . "Highest local number: %20#1d\n")
Linus Tolke's avatar
Linus Tolke committed
383
    (last-text-time . 
384
     "Time of last article: %20#1s (accordning to your cache)\n")
David Kågedal's avatar
David Kågedal committed
385
    (no-of-motd . "Note on the door in article: %13#1n\n")
David Byers's avatar
David Byers committed
386
387
388
    (superconf-is-no-name . "Superconference: %25#1m %#3s(%#2M)\n")
    (permitted-submitters-no-name . "Allowed authors: %25#1m %#3s(%#2M)\n")
    (supervisor-is-no-name . "Supervisor: %30#1p %#3s(%#2P)\n")
David Kågedal's avatar
David Kågedal committed
389
390
    (presentation-no . "Presentation:    %25#1n\n")
    (conf-has-motd . "\n%#1M has a note on the door:\n")
Linus Tolke's avatar
Linus Tolke committed
391
392

    (Everybody . "Everyone")
David Kågedal's avatar
David Kågedal committed
393
394
    (show-members-list-also-q . "List members? ")
    (conf-has-these-members . "\n%#1M has the following members:\n")
395
    (member-list-header . "Last entered       Unread  Name\n\n")
396
    (secret-membership . "--- Secret line ---\n")
David Kågedal's avatar
David Kågedal committed
397
    (conf-membership-line . "%#1s%#2M\n")
398
    (pers-for-status . "Get status of which user: ")
399
    (no-such-pers . "The user doesn't exist.\n")
David Kågedal's avatar
David Kågedal committed
400
    (pers-status-record . "Status of user %#1P (%#2p)\n")
Linus Tolke's avatar
Linus Tolke committed
401
    (created-time .  "Created:%34#1s\n\n")
402
403
404
405
406
407
408
    (created-confs . "Conferences created:%22#1d\n")
    (created-persons . "Users created:%28#1d\n")
    (created-texts . "Articles created:%25#1d\n")
    (created-lines . "Lines created:%28#1d\n")
    (created-chars . "Characters created:%23#1d\n")
    (no-of-sessions . "Session count:%28#1d\n")
    (present-time-d-h-m-s . "Total presence:%16#1d d %02#2d:%02#3d:%02#4d\n")
Linus Tolke's avatar
Linus Tolke committed
409
    (last-log-in . "Last session:%29#1s\n")
410
    (user-name . "User: %36#1s\n")
Linus Tolke's avatar
Linus Tolke committed
411
412

    (read-texts . "Articles read:%28#1d\n")
413
    (marked-texts . "Articles marked:%26#1d")
414
    (time-for-last-letter . "Time of last letter:%22#1s (accordning to your cache)\n")
David Byers's avatar
David Byers committed
415
416
    (superconf . "Superconference: %25#1m %#3s(%#2M)\n")
    (supervisor . "Supervisor: %30#1p %#3s(%#2P)\n")
David Kågedal's avatar
David Kågedal committed
417
    (member-of-confs . "Member of (conferences):%18#1d\n")
David Byers's avatar
David Byers committed
418
    (presentation . "Presentation:    %25#1n\n")
David Kågedal's avatar
David Kågedal committed
419
    (show-membership-list-also-q . "List memberships? ")
David Byers's avatar
David Byers committed
420
    (not-allowed-see-confs . "You are not premitted to see which conferences %#1P is a member of.\n")
David Kågedal's avatar
David Kågedal committed
421
    (is-member-of . "\n%#1P is a member of the following conferences:\n")
422
    (membership-list-header . "Last access       Unread Conference\n\n")
David Kågedal's avatar
David Kågedal committed
423
424
    (pers-membership-line . "%#1s%#2s%#3M\n")
    (is-supervisor-mark . "O ")
425
    (who-to-send-message-to . "Send message to whom? (%s) ")
David Kågedal's avatar
David Kågedal committed
426
    (his-total-unread . "\n%#1M has a total of %#2d unread articles.\n")
Linus Tolke's avatar
Linus Tolke committed
427
    (message-prompt . "Message: ")
428
429
    (message-sent-to-user .
     "================================================================
430
Your message for %#2M:
431

432
%#1t
433
434
435
436
437
438
----------------------------------------------------------------
")
    (message-sent-to-all . 
     "================================================================
Your public message:

439
%#1t
440
441
----------------------------------------------------------------
")
Linus Tolke's avatar
Linus Tolke committed
442
    (message-nope .
443
     "Unable to send the message. Perhaps the recipient isn't logged on.
David Byers's avatar
David Byers committed
444
The message you were sending to %#1M was:
445
%#2s\n")
446
    (only-last . "Last (0 - %#1d) articles in %#2s: ")
Linus Tolke's avatar
Linus Tolke committed
447
    (only-error . "Something went wrong. Sorry.\n")
448
    
449
450
451
452
    (you-have-unreads . "You have %#1d unread articles in %#2M\n")
    (you-have-an-unread . "You have 1 unread article in %#1M\n")
    (you-have-unreads-special . "You have %#1d uncommented articles in %#2M\n")
    (you-have-an-unread-special . "You have 1 uncommented article in %#1M\n")
Linus Tolke's avatar
Linus Tolke committed
453
454
455
456
457
458
459
    (you-have-read-everything . "No news (is bad news).\n")
    (total-unreads . "\nYou have %#1d unread articles.\n")
    (total-unread . "\nYou have 1 unread article.\n")
    (waiting-for-anything .
     "You are waiting for an article in any conference.\n")
    (waiting-higher-than . 
     "You are waiting for an article in any conference with a priority higher than %#1d.\n")
460
    
461
    (have-to-be-in-conf-with-unread . "You must go to a non-empty conference first.\n")
Linus Tolke's avatar
Linus Tolke committed
462
463
464
465
466
    (Texts . "Article")
    (Date . "Date")
    (Lines . "Lines")
    (Author . "  Author")
    (Subject . "  Subject")
David Byers's avatar
David Byers committed
467
    (could-not-read . "You couldn't read the article (%#1n).\n")
Linus Tolke's avatar
Linus Tolke committed
468
    (multiple-choice . "There are several alternatives.")
David Kågedal's avatar
David Kågedal committed
469
470
471
472
473

    (what-mark-to-list . "List which mark: ")
    (you-have-marks . "You have %#1s texts marked with %#2s.\n")
    (you-have-marks-all . "You have %#1s marked texts.\n")

474
    (does-not-exist . "Unknown command.") ; Only people fixing bugs or recieving bug-reports should change these:
David Byers's avatar
David Byers committed
475
    (summary-line . "%=-8#1n%#2s%4#3d  %[%#4@%#5:P%]  %[%#6@%#7r%]\n")
476
477

    ; Only people fixing bugs or recieving bugg-reports should change these:
478
479
    (buggrepport-compilestart . "Creating bug report...")
    (buggrepport-compileend . "Creating bug report...done")
480
    (buggreport-description . "This is what I was doing:
481
\(Fill in your comments below\)\n================\n\n
482
483
================
In the information below are the 100 most recently pressed keys from
484
485
486
487
your emacs. If you recently logged on, you password may be contained in
this list. If that is the case, change the characters corresponding to
your password to asterisks.

488
When you have finished writing this, send your bug report to the LysKOM
489
developers. You can do this either by email to bug-lyskom@lysator.liu.se or
490
by mailing a hardcopy of your bug report to:
491
492
Lysator, c/0 ISY, Linkoping Univerity, S-581 83 Linkoping, SWEDEN.
Mark the envelope with \"LysKOM bug report\"\n\n")
Linus Tolke's avatar
Linus Tolke committed
493
494
    (buggreport-internals . "LysKOM's internal information:\n\n")
    (buggreport-version . "lyskom-version:")
495
496
497
    (buggreport-emacs-version . "emacs-version:")
    (buggreport-system-id . "system-id:")
    (buggreport-ctl-arrow-doc . "ctrl-doc:")
Linus Tolke's avatar
Linus Tolke committed
498
    (buggreport-unparsed . "\nlyskom-unparsed-buffer:")
499
    (buggreport-command-keys . "Recently pressed keys:")
Linus Tolke's avatar
Linus Tolke committed
500
501
    (buggreport-backtrace . "\n*Backtrace*:\n%#1s\n")
    (buggreport-communications . "\nlyskom-debug-communications-to-buffer-buffer:")
502
    (buggreport-all-kom-variables . "\n\nOther variables:\n***** *********")
Linus Tolke's avatar
Linus Tolke committed
503
504
505
    (buggreport-instead-of-byte-comp . "byte-code(\"byte-string\"")
    (buggreport-subject . "Bugreport elisp-client version %#1s")

506

507
    (not-logged-in . "You are not logged on. ")
David Byers's avatar
David Byers committed
508
    (name-is-not-in-conf . "%#1s is not in any conference.\n")
Linus Tolke's avatar
Linus Tolke committed
509
510
    (name-is-in-conf . "%#1s is in\n%#2s\n")
    (connected-during . "Connect time: %#1d seconds.\n")
511

512
    (conf-to-set-permitted-submitters-q . "For which conference do you want to set the allowed authors: ")
513
    (conf-to-set-super-conf-q . "Set superconference of which conference: ")
514
    (new-super-conf-q . "Which conferece do you want as superconference: ")
515
    (new-permitted-submitters-q . "Allow members of which conference as authors in %#1s (all): ")
David Byers's avatar
David Byers committed
516
517
518
    (super-conf-for-is . "Changing superconference of %#1M to %#2M...")
    (permitted-submitters-removed-for-conf . "Allowing all authors to conference %#1M...")
    (submitters-conf-for-is . "Changing authors admitted to conference %#1M to the members of %#2M...") 
519
   
520
521
    (conf-to-set-garb-nice-q . "Set expiration time for which conference: ")
    (new-garb-nice-q . "What do you want to set the expiration time to: ")
David Byers's avatar
David Byers committed
522
    (garb-nice-for-is . "Changing expiration for %#1M to %#2d...")
Linus Tolke's avatar
Linus Tolke committed
523
524
525
526
527
528

    (really-shutdown . "Are you sure you want to shut down the server? ")
    (closing-server . "Shutting down the server...")
    (administrator . "administrator")
    (no-longer-administrator . "a regular user again")
    (you-are-now . "Ok, you are now running as %#1s.\n")
David Byers's avatar
David Byers committed
529
    (setting-motd . "Changing login message to article %#1n.\n")
Linus Tolke's avatar
Linus Tolke committed
530
531
532
533
    (set-motd-success . "You have set a new login message.\n")
    (set-motd-failed . "Didn't work. Perhaps you were not an administrator.\n")
    (removing-motd . "Removing the login message.\n")
    (removed-motd . "You have removed the login message.\n")
534
    (who-to-throw-out . "Which session do you want to kill: ")
Linus Tolke's avatar
Linus Tolke committed
535
    (throwing-out . "Killing session %#1d... ")
536
    (postpone-prompt . "How much do you want to read now: ")
David Kågedal's avatar
David Kågedal committed
537
    (set-session-priority . "Set reading level:")
Linus Tolke's avatar
Linus Tolke committed
538
539

    ; From review.el:
David Kågedal's avatar
David Kågedal committed
540
    (review-how-many . "Review how many: ")
Linus Tolke's avatar
Linus Tolke committed
541
542
    (latest-n . "last %#1d")
    (first-n . "first %#1d")
543
    (info-by-whom . "%#1s by whom: ")
Linus Tolke's avatar
Linus Tolke committed
544
545
546
    (info-to-conf . "%#1s to conference: ")
    (info-by-to . "%#1s by %#2s to %#3s forward.")
    (all-confs . "all conferences")
547
548
549
    (no-get-conf . "You are not allowed to access that conferene.\n")
    (no-get-pers . "You are not allowed to access that user.\n")
    (no-review-info . "You are not allowed to review %#1s\n")
David Kågedal's avatar
David Kågedal committed
550
551
    (review-info . "Review %#1s")
    (review-info-by-to . "Review %#1s by %#2P to %#3M forwards.\n")
Linus Tolke's avatar
Linus Tolke committed
552
553
554
555
556
    (you-review . "You are now reviewing %#1s.\n")
    (read-text-first . "You must read a article first.\n")
    (cannot-read-last-text . "You cannot review the last read article.\n")
    (review-n-texts . "Review %#1d articles.\n")
    (review-marked . "Review %#1d marked articles.\n")
David Byers's avatar
David Byers committed
557
558
559
    (review-text-no . "Review article %#1n")
    (review-one-comment . "Review one comment to article %#1n.\n")
    (review-many-comments . "Review %#2d comments to article %#1n.\n")
560
    (read-normally-read . "How many articles to you want to review: ")
561
562
563
564
565
    (review-conf-gone . "The conference does not exist.\n")
    (review-pers-gone . "The user does not exist.\n")
    (review-cant-read-conf . "You can't review articles to a closed conference you are not a member of.\n")
    (review-cant-read-letterbox . "You can't review articles to somebody else's mailbox.")
    (review-cant-read-empty . "The conference is empty.\n")
Linus Tolke's avatar
Linus Tolke committed
566
567

    ; From edit-text.el:
568
    (press-C-c-C-c . "Enter C-c C-c to post the article.")
Linus Tolke's avatar
Linus Tolke committed
569
    (recipient . "Recipient:")
570
    (recipient-prefix . "[Rr]")
Linus Tolke's avatar
Linus Tolke committed
571
    (carbon-copy . "Carbon copy:")
572
    (carbon-copy-prefix . "[Cc]\\([Aa]\\|[Cc]\\)")
Linus Tolke's avatar
Linus Tolke committed
573
574
    (text-mass . "%#4s%#1s\n%#2s\n%#3s")
    (comment-to-by . "%#1s to article %#2d%#3s.\n")
575
    (already-sent . "You have already posted this article. Post it anyway? ")
Linus Tolke's avatar
Linus Tolke committed
576
    (subject . "Subject: ")
577
    (subject-prefix . "[Ss]")
David Byers's avatar
David Byers committed
578
    (enter-subject-idi . "Enter a subject.")
579
    (which-text-include . "Include which article: ")
Linus Tolke's avatar
Linus Tolke committed
580
581
582
583
    (added-recipient . "Recipient: ")
    (added-carbon-copy . "Carbon copy to conference: ")
    (conf-has-motd-no . "The conference has a note on the door. (%#1d)\n\n%#2s")
    (still-want-to-add . "Do you still want to add the conference as a recipient? ")
584
    (could-not-create-text . "\nCouldn't create the article. Error: %#2s.\n")
585
    (no-get-text . "You were not allowed to retrieve the article.")
586
    (unknown-header . "Unknown header")
Linus Tolke's avatar
Linus Tolke committed
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602


    ; From view-text.el:
    (line . " /1 line/ ")
    (lines ." /%#1d lines/ ")

    (marked-by-you . "Marked by you.\n")
    (marked-by-you-and-one . "Marked by dig and someone else.\n")
    (marked-by-you-and-several . "Marked by you and %#1d other users.\n")
    (marked-by-one . "Marked by 1 user.\n")
    (marked-by-several . "Marked by %#1d users.\n")

;; The format of this function should coincide with the format of the 
;; lyskom-text-start variable. DONT change one without changing the other.

; used by lyskom-print-time
603
    (time-y-m-d-h-m . "%4#1d %02#3d/%02#1d  %02#4d:%02#5d ")
604
605
606
607
    (today-time-format-string . "%#6s %02#4d:%02#5d")
    (yesterday-time-format-string . "%#6s %02#4d:%02#5d")
    (today . "today")
    (yesterday . "yesterday")
Linus Tolke's avatar
Linus Tolke committed
608
; used by lyskom-return-time
609
    (time-yyyy-mm-dd-hh-mm . "%4#1d %02#3d/%02#2d %02#4d:%02#5d")
David Byers's avatar
David Byers committed
610
    (no-such-text-no . "The article doesn't exist. (%#1n)\n")
Linus Tolke's avatar
Linus Tolke committed
611
612
613
614

    (head-Subject . "Subject: ")
    (Recipient . "Recipient")
    (Extra-recipient . "CC")
615
    (send-at . "   Posted:     %#1s\n")
David Kågedal's avatar
David Kågedal committed
616
    (sent-by . "   Posted by %#1P\n")
Linus Tolke's avatar
Linus Tolke committed
617
    (recieved-at . "    Received: %#1s\n")
David Kågedal's avatar
David Kågedal committed
618
619
620
621
622

    (comment-to-text . "Comment to article %#1n")
    (footnote-to-text . "Footnote to article %#1n")
    (comment-in-text . "Comment in article %#1n")
    (footnote-in-text . "Footnote in article %#1n")
623
624
625
626
627
628

    (comment-to-text-by . "Comment to article %#1n by %#2P")
    (footnote-to-text-by . "Footnote to article %#1n by %#2P")
    (comment-in-text-by . "Footnote in article %#1n by %#2P")
    (footnote-in-text-by . "Footnote in article %#1n by %#2P")

David Kågedal's avatar
David Kågedal committed
629
    (written-by . " by %#1P\n")
Linus Tolke's avatar
Linus Tolke committed
630
631
632

    ; From async.el:

David Byers's avatar
David Byers committed
633
634
635
    (name-has-changed-to-name . "%#1:P has changed name to %#2:P")
    (name-has-changed-to-name-r . "%[%#3@%#1:P%] has changed name to %[%#3@%#2:P%]\n")
    (you-changed-name-to . "You have now changed your name to %[%#2@%#1:P%].\n")
Linus Tolke's avatar
Linus Tolke committed
636
    (database-sync . "Synching database.")
637

Linus Tolke's avatar
Linus Tolke committed
638
639
640
641
    (lyskom-is-full . "\
===========================================================
Message from the LysKOM-system: Somebody tried to connect,
but failed since all connections available to LysKOM are in
642
643
use. Please leave and return later if you are just waiting
for an article.
Linus Tolke's avatar
Linus Tolke committed
644
===========================================================\n")
David Kågedal's avatar
David Kågedal committed
645
    (has-entered . "%#1:P has entered LysKOM.")
David Kågedal's avatar
David Kågedal committed
646
    (has-entered-r . "%#2@%#1P has entered LysKOM.\n")
David Kågedal's avatar
David Kågedal committed
647
    (has-left . "%#1:P has left LysKOM.")
David Kågedal's avatar
David Kågedal committed
648
    (has-left-r . "%#2@%#1P has left LysKOM.\n")
Linus Tolke's avatar
Linus Tolke committed
649
650
    (unknown . "unknown")

651
652
    (message-broadcast .
"++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
David Kågedal's avatar
David Kågedal committed
653
Public message from %#1P (%#3s):
654

David Kågedal's avatar
David Kågedal committed
655
%#2t
656
657
658
659
----------------------------------------------------------------
")
    (message-from . 
"++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
David Kågedal's avatar
David Kågedal committed
660
Personal message from %#1P (%#3s):
661

David Kågedal's avatar
David Kågedal committed
662
%#2t
663
664
----------------------------------------------------------------
")
665
666
    (message-from-to .
"++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
David Byers's avatar
David Byers committed
667
Group message to %#3M from %#2P (%#4s):
668

David Byers's avatar
David Byers committed
669
%#1t
670
----------------------------------------------------------------
David Byers's avatar
David Byers committed
671
")    (text-is-created . "Article %#1n has been created!")
Linus Tolke's avatar
Linus Tolke committed
672

673
674
675
676
677
    ; Used in mode-line-process
    (mode-line-waiting . ": waiting")
    (mode-line-working . ": working")
    (mode-line-saving . ": saving")
    (mode-line-down . ": down")
Linus Tolke's avatar
Linus Tolke committed
678
679
680
681
682
683

    ; From completing-read.el:

    (person-or-conf-no-regexp . "\\`[ \t]*[mpMP]\\w*[ \t]+\\([0-9]+\\)\\'")

    ; From prioritize.el:
684
685
686
687
688
689
690
691
692
693

    (cant-move-nothing-nowhere . "Can't move nothing anywhere.")
    (priority-prompt . "New priority: ")
    (beginning-of-list . "Beginning of list")
    (end-of-list . "End of list")
    (reprioritize-from . "Reprioritize from: ")
    (reprioritize-to . "Reprioritize to: ")
    (no-selection . "No selection")
    (selection . "%d selected")

David Kågedal's avatar
David Kågedal committed
694
    (cannot-get-membership . "Cannot retrieve your membership list.")
695
    (cannot-get-pers-stat . "Cannot retrieve your personal status.")
David Kågedal's avatar
David Kågedal committed
696
    (your-membship . "Your memberships:
Linus Tolke's avatar
Linus Tolke committed
697
  Prio Conf# Conference\n")
David Byers's avatar
David Byers committed
698
    (prio-row . " %5#1d%5#2d  %#3M\n")
699
    (too-high-goto-2 . "You are too high up, move down to line two.")
Linus Tolke's avatar
Linus Tolke committed
700
701
702
703
704
705
706
707
708
    (too-low-go-up . "You can't push the last line. Move up one line.")
    (all-confs-popped .  "All conferences have been popped.")
    (prio-died . "Couldn't complete the move. Sorry. Kill the buffer.")
    (new-priority . "New priority? (0 (low) - 255 (high)) ")
    (new-prio . "%6#1d")

    ; From flags.el:
    (saving-settings . "Saving options")
    (hang-on . "Wait a moment...\n")
709
    (could-not-save-options . "Couldn't save options.")
Linus Tolke's avatar
Linus Tolke committed
710
711
712
    (could-not-create-area . "Couldn't create the article.\n")
    (could-not-set-user-area . "Couldn't alter the user-area. The server says error: %#1d\n")
    (you-dont-exist . "You don't exist. Go away.\n")
713
    (error-in-options . "There was an error in one of your variables (%#1s)
David Kågedal's avatar
David Kågedal committed
714
715
It was set to \"%#2s\" in the user area. It is set to nil instead.
Send a bug report.\n")
Linus Tolke's avatar
Linus Tolke committed
716
717
718
719
720
721

    ; From elib-string.el:
    ; No entries.

    ; From lyskom-rest.el:

722
723
724
    (mode-line-unread . " Unread")
    (mode-line-letters . " letters")

Linus Tolke's avatar
Linus Tolke committed
725
726
727
728
    (error-code . "Error code %#2d: %#1s.\n")
    (extended-command . "LysKOM: ")
    (wait-for-server . "LysKOM is waiting for a response from the server. Wait for the prompt.\n")
    (review-text-q . "Review article: ")
David Byers's avatar
David Byers committed
729
    (review-text-no . "Review article %#1n.\n")
Linus Tolke's avatar
Linus Tolke committed
730
731
732
733
734
735

    (completely-read-conf . "You have seen all the articles in this conference.\n")
    (not-in-any-conf . "You are not in a conference now.\n")

    (all-conf-unread-r . "You have nothing unread.\n")
    (all-conf-unread-s . "You have nothing unread. ")
David Kågedal's avatar
David Kågedal committed
736
737
    (one-unread . "%#1M - one unread article\n")
    (several-unread . "%#1M - %#2d unread articles\n")
Linus Tolke's avatar
Linus Tolke committed
738

739
    (save-on-file-q . "Save which article in file: (%#1s) ")
740
    (wait-for-prompt . "Wait for the prompt.")
741
    (prompt-modifier-ansaphone . "[%s]")
742
    (prompt-modifier-messages . "%s (%d messages)")
Linus Tolke's avatar
Linus Tolke committed
743
744
745
746
747
748
749
750
751
752
753
754
755
    (go-to-pri-conf-prompt . "Go to next prioritized conference")
    (read-pri-text-conf . "Read next prioritized article")
    (review-next-text-prompt . "Review next article")
    (review-next-comment-prompt . "Review next comment")
    (review-next-marked-prompt . "Review next marked article")
    (read-next-letter-prompt . "Read next letter")
    (read-next-footnote-prompt . "Read next footnote")
    (read-next-comment-prompt . "Read next comment")
    (read-next-text-prompt . "Read next article")
    (go-to-conf-of-marked-prompt . "Review next marked")
    (go-to-next-conf-prompt . "Go to next conference")
    (go-to-your-mailbox-prompt . "Go to your mailbox")
    (the-command . "Command:%#1s")
David Kågedal's avatar
David Kågedal committed
756
    (error-in-login-hook . "There was an error in your kom-login-hook: %#1s\n")
Linus Tolke's avatar
Linus Tolke committed
757
758
759
760
761
762
763
764

    (give-a-number . "Enter a number: ")

    (yes-regexp . "\\`[yY][eE][sS]\\'")
    (no-regexp . "\\`[nN][oO]\\'")
    (yes-or-no-nag . "Answer yes or no.")
    (yes-or-no . "(yes or no) ")

765
    (y-or-n-instring . "yYnN")
Linus Tolke's avatar
Linus Tolke committed
766
767
    (j-or-n-nag . "Answer y or n. ")
    (j-or-n . "(y or n) ")
768
    (y-instring . "yY")
Linus Tolke's avatar
Linus Tolke committed
769

770
    (person-does-not-exist . "User %#1d (does not exist).")
David Kågedal's avatar
David Kågedal committed
771
    (conference-does-not-exist . "Conference %#1d (does not exist).")
772
    (person-is-anonymous . "Anonymous user")
Linus Tolke's avatar
Linus Tolke committed
773
774
775
776
777
778
779
780
781
782

    (process-signal . "Signal from the process.")
    (closed-connection . "
**************************************************
LysKOM session killed abnormallly
Error message: %#1s**************************************************")
    (error-not-found . "Error code %#1d. No explanation available.")

    ; Useful in more place than one:
    (illegal-command . "Illegal command.\n")
David Byers's avatar
David Byers committed
783
784
    (no-such-text . "The article doesn't exist.\n")
    (no-such-text-m . "The article doesn't exist.")
Linus Tolke's avatar
Linus Tolke committed
785
    (everybody . "everyone")
786
    (everything . "everything")
Linus Tolke's avatar
Linus Tolke committed
787
788
789
790
791
    (anybody . "anyone")
    (forward . "forward")
    (backward . "backward")
    (wait . "Wait a moment...\n")
    (comment . "Comment")
792
    (comment-prefix . "[Cc][Oo]")
Linus Tolke's avatar
Linus Tolke committed
793
    (footnote . "Footnote")
794
    (footnote-prefix . "[Ff]")
Linus Tolke's avatar
Linus Tolke committed
795
    (by . " by %#1s")
David Byers's avatar
David Byers committed
796
    (text-created .  "Article %#1n has been created.\n")
797

David Kågedal's avatar
David Kågedal committed
798
799
    (resolve-session . "Which session: ")

800
    (starting-program . "Starting %#1s...")
David Byers's avatar
David Byers committed
801
    (super-jump . "Filtering subject \"%#1r\" in conference \"%#2M\"\n")
802
    (filtered . "[Filtered]")
803
804
805
806
    (filter-error-specification . "Error in the filter specification")
    (filter-error-bad-not . "Error in the filter specification after 'not'")
    (filter-error-unknown-key . "The filter key '%S' is unknown.")
    (filter-error-key-arg . "Bad filter data (%S %S)")
David Byers's avatar
David Byers committed
807
808
    (filter-tree . "Skipping article %n \"%s\" by %P and all its comments.\n")
    (filter-text . "Skipping article %n \"%s\" by %P.\n")
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
    (filter-permanent . "Permanent? ")
    (filter-action . "Filter how: ")
    (filter-in-conf . "In which conference (all): ")
    (filter-subject . "Filter which subject: ")
    (filter-text . "Filter articles containing: ")
    (filter-author . "Filter which author: ")
    (permanent . "(permanent)")
    (temporary . "(temporary)")
    (filter-edit-buffer-name . "*LysKOM Filter Edit*")
    (filter-edit-empty-list . "Empty list")
    (filter-edit-start-of-list . "Beginning of list")
    (filter-edit-end-of-list . "End of list")
    (filter-edit-filter-how . "Filter how? ")
    (filter-edit-filter-what . "What do you want to filter: ")
    (filter-edit-bad-argument . "Bad input: %s")
    (filter-edit-outside-entry . "Can't do that outside a filter")
    (filter-edit-outside-list . "Can't do that outside the list")
    (filter-edit-end-of-pattern . "End of filter")
    (filter-edit-save-p . "Save changes? ")
    (filter-edit-remove-empty . "Empty filters cause all articles to be filtered. Do you want to remove these? ")
    (filter-edit-restart-p . "You have made changes. Really revert? ")
    (filter-edit-help . "p Up, n Down, i New line, M-i New filter, d Delete line, M-d Delete filter")
    (filter-edit-header . "Edit filters on \"%s\"\n")
    (filter-edit-saving . "Saving changes...")
    (filter-edit-saving-done . "Saving changes...done")
    (filter-edit-saving-error . "Couldn't save changes!")
    (filter-edit-insert-pred . "%#1s (=,!=): ")
    (filter-edit-insert-arg . "%#1s %#2s (what): ")
    (no-filters . "No filters are defined.")
    (view-filters-header . "\nActive filters:\n\n")
    (view-filters-footer . "")
840
841
842
843

    (ansaphone-new-message . "New Ansaphone message: ")
    (ansaphone-message . "Ansaphone message:
----------------------------------------------------------------------
David Byers's avatar
David Byers committed
844
%#1t
845
846
847
----------------------------------------------------------------------
")
    (ansaphone-state . "The Ansaphone is %#1s.")
David Byers's avatar
David Byers committed
848
    (ansaphone-state-r . "The Ansaphone is now %#1s.\n")
849
850
851
852
853
854
855
856
857
    (ansaphone-messages-gone . "Recorded messages have been erased.")
    (ansaphone-no-messages . "No recorded messages.\n")
    (ansaphone-message-list-start . "Recorded messages:\n\n")
    (ansaphone-message-list-end . "\n\n")
    (ansaphone-message-header . "Automatic reply (set %#1s):\n")

    (remote-erase-messages . "Remote control (%#1P %#2s): Erased recorded messages\n")
    (remote-set-message . "Remote control (%#1P %#2s): Ansaphone message:
----------------------------------------------------------------------
David Byers's avatar
David Byers committed
858
%#3t
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
----------------------------------------------------------------------
")
    (remote-set-ansaphone . "Remote control (%#1P %#2s): The ansaphone is %#3s\n")
    (remote-list-messages . "Remote control (%#1P %#2s): Listed recorded messages\n")
    (remote-quit . "Remote control (%#1P %#2s): Quit\n")

    (illegal-remote . 
"Illegal remote control attempt:
Time: %#1s
From: %#2P <%#2p>
To  : %#3P <%#3p>
Text: 
%#4t")
    (illegal-remote-reply . "Remote control rejected: %#1s") 
    (remote-not-in-list . "Unauthorised person")
    (remote-bad-command . "Unknown or malformed command")
    (remote-unknown-error . "Unknown error")

    (remote-control-who . "Remotely control which session? ")
    (remote-control-autoreply . "Ansaphone on or off? ")

    (state-on . "on")
    (state-off . "off")
    

    (text-popup-title . "Article %#1s")
    (conf-popup-title . "Conference %#1s")
    (pers-popup-title . "User %#1s")
    (url-popup-title  . "URL %#1s")
    (generic-popup-title . "%#1s")
Linus Tolke's avatar
Linus Tolke committed
889
890
891
892
893
894
895
896
897
898
899
900
    )
  "Assoc list containing pairs of atoms and strings")



;;; ================================================================
;;;              The commands and their associated functions


(defconst lyskom-commands
  '(
    (describe-mode              "Help")
901
902
    (kom-slow-mode              "Long commands")
    (kom-quick-mode             "Short commands")
Linus Tolke's avatar
Linus Tolke committed
903
    (kom-send-message           "Send message")
904
    (kom-create-conf            "Create conference")
Linus Tolke's avatar
Linus Tolke committed
905
906
    (kom-delete-conf            "Delete conference")
    (kom-delete-text            "Remove article")
907
908
909
910
911
912
    (kom-display-time           "Time")
    (kom-go-to-conf             "Go (to) conference")
    (kom-go-to-next-conf        "(Go to) next conference")
    (kom-jump                   "Skip (all) comments")
    (kom-list-conferences       "List conferences") 
    (kom-list-persons           "List users")
Linus Tolke's avatar
Linus Tolke committed
913
    (kom-list-news              "List news")
914
    (kom-list-re                "List (using) regexps")
David Kågedal's avatar
David Kågedal committed
915
916
    (kom-membership             "List memberships")
    ;; (kom-list-marks		"List marks")
917
    (kom-postpone               "Postpone reading")
David Kågedal's avatar
David Kågedal committed
918
    (kom-set-session-priority	"Set reading level")
919
920
921
    (kom-prioritize             "Prioritize conferences")
    (kom-status-person          "Status (of) user")
    (kom-status-conf            "Status (of) conference")
David Kågedal's avatar
David Kågedal committed
922
    (kom-add-self               "Join (a) conference")
923
    (kom-list-summary           "List article (subjects)")
David Kågedal's avatar
David Kågedal committed
924
    (kom-sub-self               "Leave (a) conference")
925
926
927
928
929
930
931
    (kom-quit                   "Quit")
    (kom-recover                "Recover") 
    (kom-start-anew             "New User")
    (kom-view                   "Review article")
    (kom-find-root-review       "Review tree")
    (kom-review-comments        "Review all comments")
    (kom-review-tree            "Review all comments recursively")
Linus Tolke's avatar
Linus Tolke committed
932
    (kom-review-clear           "Review and skip")
933
934
    (kom-review-last-normally-read
     				"Review again")
935
    (kom-review-noconversion	"Review unconverted")
Linus Tolke's avatar
Linus Tolke committed
936
    (kom-review-next            "Review next")
937
    (kom-find-root              "Review original (article)")
David Byers's avatar
David Byers committed
938
    (kom-review-by-to           "Review last")
939
    (kom-review-all             "Review all")
Linus Tolke's avatar
Linus Tolke committed
940
    (kom-view-commented-text    "Review (the) commented (article)")
941
942
    (kom-view-previous-commented-text
     				"Review (the) previouls commented (article)")
Linus Tolke's avatar
Linus Tolke committed
943
944
945
    (kom-review-stack           "Review stack")
    (kom-review-presentation    "Review presentation")
    (kom-review-backward        "(Review) Backwards")
946
947
    (kom-view-next-text         "(Read) next article")
    (kom-who-is-on              "Who (is on)") 
David Byers's avatar
David Byers committed
948
;    (kom-display-who-buffer     "Display who (list)")
949
    (kom-list-clients		"List clients")
950
951
952
    (kom-busy-wait              "Wait (for news)")
    (kom-write-comment          "(Write) comment")
    (kom-comment-previous       "(Write) comment (to) previous article")
Linus Tolke's avatar
Linus Tolke committed
953
954
    (kom-write-footnote         "(Write) footnote")
    (kom-private-answer         "(Write) personal reply (by letter)")
955
956
    (kom-private-answer-previous
     "(Write) personal (reply to) previous article (by letter)")
957
958
959
960
    (kom-set-unread     		"Only (the) last")
    (kom-write-text             "Write (an) article")
    (kom-send-letter            "Write (a) letter")
    (kom-change-name            "Change name")
Linus Tolke's avatar
Linus Tolke committed
961
    (kom-change-password        "Change password")
962
    (kom-change-supervisor  	"Change supervisor")
Linus Tolke's avatar
Linus Tolke committed
963
964
965
966
967
968
969
970
    (kom-change-presentation	"Change presentation")
    (kom-get-appreciation       "(Please) pat my head")
    (kom-get-abuse              "(Please) kick my butt")
    (kom-mark-text              "Mark (article)")
    (kom-unmark-text            "Unmark (article)")
    (kom-review-marked-texts    "Review marked (articles)")
    (kom-review-all-marked-texts "Review all marked (articles)")
    (kom-add-recipient          "Add recipient")
971
    (kom-add-copy               "Add (recipient of) carbon copy")
Linus Tolke's avatar
Linus Tolke committed
972
    (kom-sub-recipient          "Remove recipient")
973
974
    (kom-add-comment            "Add comment")
    (kom-sub-comment            "Remove comment")
David Kågedal's avatar
David Kågedal committed
975
976
    (kom-add-member             "Add (a) member")
    (kom-sub-member             "Remove (a) member")
977
    (kom-change-conf-motd       "(Post) note (on the) door")
Linus Tolke's avatar
Linus Tolke committed
978
    (kom-set-garb-nice          "Change expiration")
979
    (kom-set-super-conf         "Change superconference")
980
981
982
983
    (kom-set-permitted-submitters  "Change allowed authors")
    (kom-unset-conf-motd        "Remove note (from the door)")
    (kom-save-text              "Save article (in file)")
    (kom-edit-options           "Change options")
Linus Tolke's avatar
Linus Tolke committed
984
985
986
987
988
    (kom-shutdown-server        "Shut down (server)")
    (kom-enable-adm-caps        "Become administrator")
    (kom-disable-adm-caps       "Become (normal) user")
    (kom-set-motd               "Change login message")
    (kom-remove-motd            "Remove login message")
989
    (kom-force-logout           "Kill session")
990
991
992
993
994
995
996
997
998
999
    (kom-list-files             "List files")
    (kom-put-file               "Put file")
    (kom-get-file               "Get file")
    (kom-filter-author          "Filter author")
    (kom-filter-subject         "Filter subject")
    (kom-super-jump             "Super jump")
    (kom-filter-edit            "Edit filters")
    (kom-filter-text            "Filter contents")
    (kom-list-filters           "List filters")
    (kom-show-user-area         "Show user area")
David Kågedal's avatar
David Kågedal committed
1000
    (kom-change-conf-type "Change conference type")
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011

    (kom-change-auto-reply "Change ansaphone message")
    (kom-toggle-auto-reply "Ansaphone")
    (kom-list-messages     "List messages")
    (kom-erase-messages    "Erase messages")

    (kom-remote-autoreply  "Remote control ansaphone")
    (kom-remote-set-message "Remote control change ansaphone message")
    (kom-remote-list-messages "Remote control list messages")
    (kom-remote-erase-messages "Remote control erase messages")
    (kom-remote-quit "Remote control quit")
Linus Tolke's avatar
Linus Tolke committed
1012