Commit dac16305 authored by David Byers's avatar David Byers
Browse files

Updated documentation. Added some variables to the settings buffer.

Detailed changes:
> 	* option-edit.el (lyskom-custom-variables): Changed
> 	kom-galeon-command, kom-netscape-command and kom-mosaic-command to
> 	widget type command. Added Lynx-related variables.
>
3a8,10
> 	(kom-lynx-terminal): Added to server-stored variables.
> 	(kom-lynx-xterm-command): Ditto.
> 	(kom-lynx-terminal-command): Ditto.
parent 0f283021
2003-01-12 David Byers <david.byers@swipnet.se>
* option-edit.el (lyskom-custom-variables): Changed
kom-galeon-command, kom-netscape-command and kom-mosaic-command to
widget type command. Added Lynx-related variables.
* vars.el.in: More documentation updates.
(kom-lynx-terminal): Added to server-stored variables.
(kom-lynx-xterm-command): Ditto.
(kom-lynx-terminal-command): Ditto.
* lyskom-rest.el (lyskom-beep): List arguments were not handled
correctly (the default key, t, was not used).
......
......@@ -152,6 +152,7 @@ language-force A language-variable whose value is to be forced."
(server-doc nil)
(language-force nil)
(arglist args))
; (message "%S" name)
(while arglist
(cond ((stringp (car arglist)) (setq doc-string (car arglist)))
((consp (car arglist))
......
......@@ -2775,6 +2775,13 @@ Select whether to execute command or keyboard macro.")
(fonts . "Fonts\n")
(other-face . "Other")
(ext-simple-command . "Simple command")
(ext-complex-command . "Command with arguments")
(ext-complex-component . "Command/argument")
(lynx-xterm . "Lynx in xterm")
(lynx-emacs . "Lynx in emacs terminal-mode")
;;
;; Misc doc strings
;;
......@@ -3784,6 +3791,15 @@ be saved in the server. Otherwise it will be saved in your .emacs.")
on other text. Properties not defined by this face will be retained.
For example, if you only set the weight property, the colors normally
used will not be changed.")
(kom-lynx-terminal-doc . "\
Lynx can run inside emacs or in an xterm (or similar). This setting
decides which.")
(kom-lynx-terminal-command-doc . "\
This is the command to use to start Lynx in emacs terminal-mode.
It should be something simple, like \"lynx\".")
(kom-lynx-xterm-command-doc . "\
This is the command to use to start Lynx in an xterm. The command
neets to start both the terminal emulator and lynx.")
;;
;; Tags for variables
......@@ -3906,7 +3922,7 @@ be saved in the server. Otherwise it will be saved in your .emacs.")
(kom-remote-controllers-tag . "People allowed to use remove commands:")
(kom-customize-format-tag . "Show documentation for all settings:")
(kom-default-language-tag . "Default language: ")
(kom-default-language-tag . "Default language:")
(kom-show-namedays-tag . "Show today's names:")
(kom-ispell-dictionary-tag . "Spelling dictionary:")
......@@ -3982,6 +3998,9 @@ be saved in the server. Otherwise it will be saved in your .emacs.")
(kom-dashed-lines-face-tag . "Dashed lines around texts:")
(kom-async-text-body-face-tag . "Messages:")
(kom-async-dashed-lines-face-tag . "Dashed lines around messages:")
(kom-lynx-terminal-command-tag . "Command to run lynx in emacs:")
(kom-lynx-terminal-tag . "Where to run lynx:")
(kom-lynx-xterm-command-tag . "Command to run lynx in xterm:")
)
)
......
......@@ -255,6 +255,10 @@
[kom-mosaic-command]
[kom-netscape-command]
[kom-galeon-command]
[kom-lynx-terminal]
[kom-lynx-xterm-command]
[kom-lynx-terminal-command]
"\n\n"
section
......@@ -662,9 +666,25 @@ customize buffer but do not save them to the server."
(kom-url-viewer-preferences (repeat (url-viewer nil :tag viewer-program)
:indent 4))
(kom-windows-browser-command (file))
(kom-mosaic-command (file))
(kom-netscape-command (file))
(kom-galeon-command (file))
(kom-mosaic-command (choice ((file nil :tag ext-simple-command :format "%[%t:%] %v\n")
(repeat (string nil :tag ext-complex-component :format "%[%t:%] %v\n")
:tag ext-complex-command
:menu-tag ext-complex-command))))
(kom-netscape-command (choice ((file nil :tag ext-simple-command :format "%[%t:%] %v\n")
(repeat (string nil :tag ext-complex-component :format "%[%t:%] %v\n")
:tag ext-complex-command
:menu-tag ext-complex-command))))
(kom-galeon-command (choice ((file nil :tag ext-simple-command :format "%[%t:%] %v\n")
(repeat (string nil :tag ext-complex-component :format "%[%t:%] %v\n")
:tag ext-complex-command
:menu-tag ext-complex-command))))
(kom-lynx-terminal (choice ((const (lynx-xterm xterm))
(const (lynx-emacs terminal)))))
(kom-lynx-terminal-command (file))
(kom-lynx-xterm-command (choice ((file nil :tag ext-simple-command :format "%[%t:%] %v\n")
(repeat (string nil :tag ext-complex-component :format "%[%t:%] %v\n")
:tag ext-complex-command
:menu-tag ext-complex-command))))
(kom-confirm-multiple-recipients
(choice ((const (dont-check nil))
(const (check-before-open before))
......@@ -807,6 +827,7 @@ customize buffer but do not save them to the server."
(person . lyskom-person-widget)
(language-choice . lyskom-language-widget)
(file . lyskom-file-widget)
(ext-command . lyskom-external-command-widget)
(ansaphone . lyskom-ansaphone-reply-widget)
(mark-association . lyskom-mark-association-widget)
))
......
......@@ -2882,6 +2882,13 @@ teckenkodning.
(fonts . "Teckensnitt\n")
(other-face . "Annat")
(ext-simple-command . "Enkelt kommando")
(ext-complex-command . "Kommando med argument")
(ext-complex-component . "Komanndo/argument")
(lynx-xterm . "Lynx i xterm")
(lynx-emacs . "Lynx i emacs terminal-mode")
;;
;; Misc doc strings
;;
......@@ -3896,6 +3903,15 @@ i servern. Annars sparas det i din .emacs.")
verlagras p standardteckensnitten i streckraderna, s de
egenskaper som inte stts av detta teckensnitt kommer inte att
pverkas.")
(kom-lynx-terminal-doc . "\
Lynx kan kras inuti Emacs eller i en xterm (eller motsvarande). Hr
vljer du vilket.")
(kom-lynx-terminal-command-doc . "\
Kommandot som anvnds fr att starta Lynx i Emacs terminal-mode.
Ska normalt vara s enkelt som \"lynx\".")
(kom-lynx-xterm-command-doc . "\
Kommandot som anvnds fr att starta Lynx i en xterm. Kommandot ska
starta bde xterm och lynx.")
......@@ -4095,6 +4111,9 @@ i servern. Annars sparas det i din .emacs.")
(kom-dashed-lines-face-tag . "Streckrader runt inlgg:")
(kom-async-text-body-face-tag . "Meddelanden:")
(kom-async-dashed-lines-face-tag . "Streckrader runt meddelanden:")
(kom-lynx-terminal-command-tag . "Kommando fr Lynx i Emacs:")
(kom-lynx-terminal-tag . "Var ska Lynx kra:")
(kom-lynx-xterm-command-tag . "Kommando fr Lynx i xterm:")
)
)
......
......@@ -1628,39 +1628,102 @@ Values other than `t' and `nil' are reserved for future use."
server)
(def-kom-var kom-friends nil
"*List of people whose names should be formatted using kom-friends-face.
Also used in kom-who-is-on-and-friend. This is a list of integers (person
numbers)."
"**List of friends and other nice people.
The value of this variable is a list of person numbers. People listed
here will be displayed using the face in `kom-friends-face'. They can
also receive special treatment in other cases (see
`kom-presence-message').
See `kom-morons' for a related variable.
Values other than a list of integers are reserved for future use."
server)
(def-kom-var kom-morons nil
"*List of people whose names should be formatted using kom-morons-face."
"*List of people morons and other nasty people.
The value of this variable is a list of person numbers. People listed
here will be displayed using the face in `kom-morons-face'.
See `kom-friends' for a related variable.
Values other than a list of integers are reserved for future use."
server)
(def-kom-var kom-dont-check-commented-authors nil
"*List of recipients who do not need to be added to comments that they
might not see. Typically this list consists of import agents."
"**A list of recipients that don't need to see comments to their texts.
When writing a comment, the client checks that the author of the
commented text is a member of at least one of the recipients. If that
is not the case, the user will be offered to add the author as a
recipient.
This variable lists authors who shold not be checked in this manner.
Typically it will contain a list of import agents.
Values other than a list of integers are reserved for future use."
server
inherited)
(def-kom-var kom-smileys t
"*Non-`nil' means to reformat smileys in text."
"**Controls display of graphical smileys.
When set to `t', display graphical smileys instead of `:-)' and
similar character sequences. When set to `nil', do not display
graphical smileys.
For this to work at all you must have the `smiley' or `smiley-ems'
installed (usually installed with Gnus) and support for graphics (part
of XEmacs and Gnu Emacs 21.x and later).
Values other than `t' and `nil' are reserved for future use."
server)
(def-kom-var kom-text-properties t
"*Non-`nil' means to insert text properties in the Emacs buffer for
various LysKOM elements.")
"**Controls use of text properties in LysKOM (fonts and stuff).
When set to `t', the client will freely use text properties, like
fonts. When set to `nil', the client will not use text properties.
This will disable all font usage and clickable stuff.
Values other than `t' and `nil' are reserved for future use.")
(def-kom-var kom-use-button-hints t
"*Non-`nil' means use button hints for overriding default actions.")
"**Controls use of context sensitive actions on clickable areas.
When set to `t', clickable areas of the same type may behave
differently depending on what command created them. For example, in
one case clicking a conference name may show the presentation of that
conference and in another it will go to the conference.
Values other than `t' and `nil' are reserved for future use.")
(def-kom-var kom-autowrap t
"*Non-`nil' means auto wrap articles with discretion.
A number means wrap articles shorter than the number (in bytes)."
"**Controls automatic text wrapping.
When set to `t', automatically break long lines in texts. A set of
rules attempts to limit line breaking to regular, unformatted text.
This works most of the time, but occasionally fails (in which case
`kom-review-noconversion' comes in handy).
When set to an integer, perform automatic line breaking in text no
longer than that many characters.
When set to `nil', do not break lines automatically at all.
Values other than `t', `nil' and integers are reserved for future
use."
server)
(def-kom-var kom-keep-alive-interval 180
"*The number of seconds between periodic requests used to keep the session alive"
"**Polling interval for `kom-keep-alive'.
The command `kom-keep-alive' polls the server periodically to keep the
connection active. This variable specifies how many seconds to wait
between these periodic requests to the server.
Values other than integers are reserved for future use."
server)
(defvar lyskom-transforming-external-text nil
......@@ -1724,64 +1787,79 @@ FACE is the text face to apply to the button, or nil to use the default face.")
"windows"
"w3")
"*LysKOM will attempt to use URL viewers in the order specified here.
kom-url-managers is a list of all available viewers. Note that the elements
are all strings.
"**Specifies application preferences for opening URLs.
This is a list of URL handlers to try when opening a URL. Each handler
is associated with a set of protocols. An URL will be opened by the
first handler in the list that is associated with the URLs protocol.
Value values for elements in the list are:
When you select a URL, this list is used to determine which URL
viewer to use in the following manner: Each element is in turn matched
against the manager regexp for each manager in kom-url-managers, and the
first manager found that matches is used to display the URL.
Handler What it does Handles protocols
\"default\" Use `browse-url' to open URLs All
\"windows\" Microsoft Windows default All
\"netscape\" Opens URLs in Netscape/Mozilla All
\"mosaic\" Opens URLs in NCSA Mosaic All common
\"lynx\" Opens URLs in Lynx All common
\"galeon\" Opens URLs in Galeon All common
\"w3\" Opens URLs in Emacs W3 http,gopher,ftp
\"emacs\" Opens URLs in Emacs ftp,telnet,file,mailto
\"dired\" Opens URLs in Emacs ftp,file
\"telnet-mode\" Opens URLs in Emacs telnet
\"mail-mode\" Opens URLs in Emacs mailto
See kom-url-managers for a list of all available URL viewers. See
kom-netscape-command and kom-mosaic-command for information specific
to some URL viewers."
The variable `kom-url-managers' contains a list of all handlers.
See `kom-mosaic-command', `kom-netscape-command',
`kom-galeon-command', `kom-lynx-terminal-command',
`kom-lynx-xterm-command', and `kom-windows-browser-command' for
additional settings that affect opening URLs."
server)
(def-kom-var kom-url-managers '(("default"
".*"
"Browse-URL"
lyskom-view-url-browse-url)
("w3"
"\\(http\\|gopher\\|ftp\\)"
"Emacs W3"
lyskom-view-url-w3)
("windows"
".*"
"web browser"
lyskom-view-url-windows)
("netscape"
".*"
"Netscape Navigator/Mozilla"
lyskom-view-url-netscape)
("\\(emacs\\|dired\\)"
"\\(ftp\\|file\\)"
"dired"
lyskom-view-url-dired)
("\\(emacs\\|telnet-mode\\)"
"telnet"
"emacs telnet"
lyskom-view-url-telnet)
("\\(emacs\\|mail-mode\\)"
"mailto"
"mail-mode"
lyskom-view-url-mailmode)
("mosaic"
"\\(http\\|gopher\\|ftp\\|mailto\\|news\\|wais\\|file\\|telnet\\)"
"NCSA Mosaic"
lyskom-view-url-mosaic)
("lynx"
"\\(http\\|gopher\\|ftp\\|mailto\\|news\\|wais\\|file\\|telnet\\)"
"Lynx"
lyskom-view-url-lynx)
("galeon"
"\\(http\\|gopher\\|ftp\\|mailto\\|news\\|wais\\|file\\|telnet\\)"
"Galeon"
lyskom-view-url-galeon))
".*"
"Browse-URL"
lyskom-view-url-browse-url)
("w3"
"\\(http\\|gopher\\|ftp\\)"
"Emacs W3"
lyskom-view-url-w3)
("windows"
".*"
"web browser"
lyskom-view-url-windows)
("netscape"
".*"
"Netscape Navigator/Mozilla"
lyskom-view-url-netscape)
("\\(emacs\\|dired\\)"
"\\(ftp\\|file\\)"
"dired"
lyskom-view-url-dired)
("\\(emacs\\|telnet-mode\\)"
"telnet"
"emacs telnet"
lyskom-view-url-telnet)
("\\(emacs\\|mail-mode\\)"
"mailto"
"mail-mode"
lyskom-view-url-mailmode)
("mosaic"
"\\(http\\|gopher\\|ftp\\|mailto\\|news\\|wais\\|file\\|telnet\\)"
"NCSA Mosaic"
lyskom-view-url-mosaic)
("lynx"
"\\(http\\|gopher\\|ftp\\|mailto\\|news\\|wais\\|file\\|telnet\\)"
"Lynx"
lyskom-view-url-lynx)
("galeon"
"\\(http\\|gopher\\|ftp\\|mailto\\|news\\|wais\\|file\\|telnet\\)"
"Galeon"
lyskom-view-url-galeon))
"List of URL managers. Each element is a list consisting of
(MANAGER-REGEXP PROTOCOLS NAME VIEW-FUNCTION). When LysKOM attempts to
\(MANAGER-REGEXP PROTOCOLS NAME VIEW-FUNCTION). When LysKOM attempts to
view a URL, kom-url-viewer-preferences is scanned, and the URL
-manager whose MANAGER-REGEXP first matches an element in
kom-url-viewer-preferences and whose PROTOCOLS matches the protocol of
......@@ -1789,57 +1867,68 @@ the selected URL is used to view the URL by calling its VIEW-FUNCTION
with the URL and the manager entry as arguments.")
(def-kom-var kom-windows-browser-command ""
"*Program to run to open a URL in Windows. If it is the empty
string, a couple of commands that are likely the work on Windows will
be tried."
"**Program to open a URL in Windows.
If it is the empty string, a couple of commands that are likely to
work on Windows will be tried."
server)
(def-kom-var kom-mosaic-command "/usr/local/bin/mosaic"
"*Command to run to start Mosaic."
"**Command to run Mosaic.
Note that Mosaic uses its own special conventions to open URLs
remotely that are probably not suitable for other browsers."
server)
(def-kom-var kom-netscape-command "netscape"
"*Command to run to start Netscape or Mozilla.
"**Command to start Netscape or Mozilla.
If a string, it should be a command that starts Netscape or Mozilla
with no arguments. If a list, the first element must be a command
that starts Netscape. The remaining elements are used as arguments
to Netscape.
If set to a string, it should be a command that starts Netscape or
Mozilla with no arguments. If a list, the first element must be a
command that starts Netscape. The remaining elements are used as
arguments to Netscape.
For instance, a value of \"netscape\" is valid, but \"netscape -d host:0\"
is not. Instead, the latter should be \(\"netscape\" \"-d\" \"host:0\"\)"
For instance, a value of `\"netscape\"' is valid, but `\"netscape -d
host:0\"' is not. Instead, the latter should be `\(\"netscape\" \"-d\"
\"host:0\"\)'"
server)
(def-kom-var kom-galeon-command "galeon"
"*Command to run to start Galeon.
"**Command used to run to start Galeon.
If a string, it should be a command that starts Galeon with no
arguments. If a list, the first element must be a command that starts
Galeon. The remaining elements are used as arguments to Galeon.
For instance, a value of \"galeon\" is valid, but \"galeon --display host:0\"
is not. Instead, the latter should be \(\"galeon\" \"--display\" \"host:0\"\)"
For instance, a value of `\"galeon\"' is valid, but `\"galeon
--display host:0\"' is not. Instead, the latter should be
`\(\"galeon\" \"--display\" \"host:0\"\)'"
server)
(def-kom-var kom-lynx-terminal 'xterm
"*Where to start Lynx.
Valid values are 'xterm (start Lynx in an xterm) and 'terminal (start
Lynx in Emacs terminal mode).")
"**Where to start Lynx when opening URLs.
Valid values are `xterm' \(start Lynx in an xterm) and `terminal'
\(start Lynx in Emacs terminal mode)."
server)
(def-kom-var kom-lynx-xterm-command
'("xterm" "-geometry" "90x50+100+100" "-e" "lynx")
"*Command to run to start Lynx in an xterm.
"**Command to run to start Lynx in an xterm.
Must be a list of strings, where the first element is the name of the
xterm program, and the remaining elements are arguments to the
xterm. The last elements should be \"-e\" \"lynx\", or something similar,
to start Lynx.")
to start Lynx."
server)
(def-kom-var kom-lynx-terminal-command "lynx"
"*Command to run Lynx in Emacs terminal mode.
"**Command to run Lynx in Emacs terminal mode.
This can be either a string, to start Lynx with no arguments, or a
list of strings, where the first element is the command, and the rest
are arguments to Lynx.")
are arguments to Lynx."
server)
(def-kom-var kom-confirm-multiple-recipients 'after
"*Non-nil means ask the user for confirmation about recipients.
......
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