summaryrefslogtreecommitdiff
path: root/web/cgi/alpine/1.0
diff options
context:
space:
mode:
Diffstat (limited to 'web/cgi/alpine/1.0')
-rwxr-xr-xweb/cgi/alpine/1.0/addredit.tcl2
-rwxr-xr-xweb/cgi/alpine/1.0/attach.tcl2
-rwxr-xr-xweb/cgi/alpine/1.0/compose.tcl2
-rwxr-xr-xweb/cgi/alpine/1.0/detach.tcl3
-rwxr-xr-xweb/cgi/alpine/1.0/do_view.tcl4
-rwxr-xr-xweb/cgi/alpine/1.0/dosend.tcl2
-rwxr-xr-xweb/cgi/alpine/1.0/export.tcl2
-rwxr-xr-xweb/cgi/alpine/1.0/filtedit.tcl4
-rwxr-xr-xweb/cgi/alpine/1.0/fr_tconfig.tcl2
-rwxr-xr-xweb/cgi/alpine/1.0/genvars.tcl2
-rw-r--r--web/cgi/alpine/1.0/help/index.html2
-rw-r--r--web/cgi/alpine/1.0/help/index.tcl.12
-rw-r--r--web/cgi/alpine/1.0/help/tech-notes.html14
-rwxr-xr-xweb/cgi/alpine/1.0/index.tcl4
-rwxr-xr-xweb/cgi/alpine/1.0/ldapresult.tcl4
-rwxr-xr-xweb/cgi/alpine/1.0/post.tcl4
-rwxr-xr-xweb/cgi/alpine/1.0/select2.tcl2
-rwxr-xr-xweb/cgi/alpine/1.0/seltext.tcl2
-rwxr-xr-xweb/cgi/alpine/1.0/spellcheck.tcl2
-rwxr-xr-xweb/cgi/alpine/1.0/view.tcl4
-rwxr-xr-xweb/cgi/alpine/1.0/wp.tcl2
21 files changed, 34 insertions, 33 deletions
diff --git a/web/cgi/alpine/1.0/addredit.tcl b/web/cgi/alpine/1.0/addredit.tcl
index 8aecda2e..d0fb3865 100755
--- a/web/cgi/alpine/1.0/addredit.tcl
+++ b/web/cgi/alpine/1.0/addredit.tcl
@@ -135,7 +135,7 @@ WPEval $ae_vars {
if {$take == 1} {
- lappend tmptxt "Edit the new entry below as neccessary (note, some are required). To create a list entry, simply add each desired address to the [cgi_italic Addresses] field separated by a comma."
+ lappend tmptxt "Edit the new entry below as necessary (note, some are required). To create a list entry, simply add each desired address to the [cgi_italic Addresses] field separated by a comma."
lappend tmptxt "When finished, click [cgi_italic Save] to update your address book, or [cgi_italic Cancel] to return to the message view."
} elseif {$add == 1} {
lappend tmptxt "The address book entry editor is used to create a new address book entry. Fill in the fields as desired below (note, some are required). To create a list entry, simply add each desired address to the [cgi_italic Addresses] field separated by a comma."
diff --git a/web/cgi/alpine/1.0/attach.tcl b/web/cgi/alpine/1.0/attach.tcl
index e0423171..9e83c8fd 100755
--- a/web/cgi/alpine/1.0/attach.tcl
+++ b/web/cgi/alpine/1.0/attach.tcl
@@ -82,7 +82,7 @@ if {$cancel == 1 || [string compare cancel [string tolower $cancel]] == 0 || [st
set fsize [file size [lindex $file 0]]
if {$fsize <= 0} {
- WPCmd PEInfo statmsg "Attachment $jsnative empty or nonexistant"
+ WPCmd PEInfo statmsg "Attachment $jsnative empty or nonexistent"
}
} else {
WPCmd PEInfo statmsg "Requested attachment does not exist"
diff --git a/web/cgi/alpine/1.0/compose.tcl b/web/cgi/alpine/1.0/compose.tcl
index d5a6af3d..b6a38a45 100755
--- a/web/cgi/alpine/1.0/compose.tcl
+++ b/web/cgi/alpine/1.0/compose.tcl
@@ -676,7 +676,7 @@ WPEval $compose_vars {
if {0 && [info exists charset]} {
cgi_text "form_charset=$charset" type=hidden notab
- # character encoding suport: the idea is to plant a known
+ # character encoding support: the idea is to plant a known
# char in the given charset and see what comes back to
# post.tcl from the browser. Why is it again the @#*$!
# browser can't just tell us?
diff --git a/web/cgi/alpine/1.0/detach.tcl b/web/cgi/alpine/1.0/detach.tcl
index d53ef313..2758e380 100755
--- a/web/cgi/alpine/1.0/detach.tcl
+++ b/web/cgi/alpine/1.0/detach.tcl
@@ -164,7 +164,8 @@ WPEval $detach_vars {
close $cfd
- # prepare to clean up if the brower never redirects
+
+ # prepare to clean up if the browser never redirects
cgi_http_head {
# redirect to the place we stuffed the detach info. use the ip address
diff --git a/web/cgi/alpine/1.0/do_view.tcl b/web/cgi/alpine/1.0/do_view.tcl
index fb8c5af6..2413a68f 100755
--- a/web/cgi/alpine/1.0/do_view.tcl
+++ b/web/cgi/alpine/1.0/do_view.tcl
@@ -117,7 +117,7 @@ if {[string compare save [string tolower $op]] == 0} {
source [WPTFScript auth]
set nopage 1
} else {
- statmsg "Existance test failed: $reason"
+ statmsg "Existence test failed: $reason"
}
} elseif {$reason == 0} {
if {$create == 1 || [string compare create [string tolower $create]] == 0} {
@@ -157,7 +157,7 @@ if {[string compare save [string tolower $op]] == 0} {
}
}
} else {
- statmsg "Cannot Save to emtpy folder name"
+ statmsg "Cannot Save to empty folder name"
}
}
}
diff --git a/web/cgi/alpine/1.0/dosend.tcl b/web/cgi/alpine/1.0/dosend.tcl
index 44130572..77d2503f 100755
--- a/web/cgi/alpine/1.0/dosend.tcl
+++ b/web/cgi/alpine/1.0/dosend.tcl
@@ -55,7 +55,7 @@ if {[catch {WPCmd PEInfo set suspended_composition} msgdata] == 0} {
if {[string compare BADPASSWD [string range $errstr 0 8]] == 0
&& [catch {WPCmd PEInfo set suspended_composition $msgdata} errstr] == 0} {
set oncancel "page=compose&restore=1&cid=$cid"
- set conftext "Send Messsage?"
+ set conftext "Send Message?"
set reason "The server used to send this message requires authentication.[cgi_nl][cgi_nl]Enter Username and Password to connect to $server"
_cgi_set_uservar params [WPPercentQuote [list [list server $server] [list page dosend] [list postpost $postpost]]]
set src auth
diff --git a/web/cgi/alpine/1.0/export.tcl b/web/cgi/alpine/1.0/export.tcl
index 338e928c..9070bd46 100755
--- a/web/cgi/alpine/1.0/export.tcl
+++ b/web/cgi/alpine/1.0/export.tcl
@@ -140,7 +140,7 @@ WPEval $export_vars {
exec /bin/chmod [cgi_tmpfile_permissions] $dfile
}
- # prepare to clean up if the brower never redirects
+ # prepare to clean up if the browser never redirects
if {[info exists redirect]} {
set redirect "${redirect}${safegivenname}?h=${rhandle}"
} else {
diff --git a/web/cgi/alpine/1.0/filtedit.tcl b/web/cgi/alpine/1.0/filtedit.tcl
index 34b9bd0f..3c55b567 100755
--- a/web/cgi/alpine/1.0/filtedit.tcl
+++ b/web/cgi/alpine/1.0/filtedit.tcl
@@ -661,11 +661,11 @@ cgi_html {
}
cgi_table_row {
wpGetVarAs setkeywords setkeywords
- freetext_cell "Set these Keywoards" setkeywords $setkeywords
+ freetext_cell "Set these Keywords" setkeywords $setkeywords
}
cgi_table_row {
wpGetVarAs clearkeywords clearkeywords
- freetext_cell "Clear these Keywoards" clearkeywords $clearkeywords
+ freetext_cell "Clear these Keywords" clearkeywords $clearkeywords
}
}
}
diff --git a/web/cgi/alpine/1.0/fr_tconfig.tcl b/web/cgi/alpine/1.0/fr_tconfig.tcl
index a7d62244..149bd383 100755
--- a/web/cgi/alpine/1.0/fr_tconfig.tcl
+++ b/web/cgi/alpine/1.0/fr_tconfig.tcl
@@ -17,7 +17,7 @@
# in webpine-lite pages.
# This page assumes that it was loaded by conf_process.tcl
-# Intput:
+# Input:
set frame_vars {
}
diff --git a/web/cgi/alpine/1.0/genvars.tcl b/web/cgi/alpine/1.0/genvars.tcl
index b982aee9..6b86e6e7 100755
--- a/web/cgi/alpine/1.0/genvars.tcl
+++ b/web/cgi/alpine/1.0/genvars.tcl
@@ -86,7 +86,7 @@ set folder_vars {
{feat enable-dot-folders "Enable Hidden Folders"}
{feat enable-lame-list-mode "Enable Lame List Mode"}
{feat try-alternative-authentication-driver-first "Try Alternative Authentication First"}
- {feat quell-empty-directories "Do Not Display Empty Directores"}
+ {feat quell-empty-directories "Do Not Display Empty Directories"}
}
set address_vars {
diff --git a/web/cgi/alpine/1.0/help/index.html b/web/cgi/alpine/1.0/help/index.html
index 58bcd323..b8c1c305 100644
--- a/web/cgi/alpine/1.0/help/index.html
+++ b/web/cgi/alpine/1.0/help/index.html
@@ -200,7 +200,7 @@ button to initiate saving. Once saved, the chosen messages will be marked for d
<!---Config option for Collection lists?-->
<a name="flags"><b>Setting status flags</b></a><p>
-By default, the area immediatly to the left of the message numbers is reserved for the following status flags:
+By default, the area immediately to the left of the message numbers is reserved for the following status flags:
<table border=0 cellpadding=4 style="margin-left:24">
<tr>
<td><font face=Courier><b>+</b></font></td>
diff --git a/web/cgi/alpine/1.0/help/index.tcl.1 b/web/cgi/alpine/1.0/help/index.tcl.1
index 67cc941d..d20bb2c1 100644
--- a/web/cgi/alpine/1.0/help/index.tcl.1
+++ b/web/cgi/alpine/1.0/help/index.tcl.1
@@ -150,7 +150,7 @@ The set of aggregate operations are either hidden or exposed. When
hidden you will see a <img src=../../images/slideout.gif style="vertical-align:middle"> tab on the left edge of the line
containing the sort names. Click the tab to expose the aggregate
commands and the checkboxes next to each message. Similarly, when aggregate operations are visible, you will see a
-<img src=../../images/slidein.gif style="vertical-align:middle"> tab on the line containg the sort names. You can click this
+<img src=../../images/slidein.gif style="vertical-align:middle"> tab on the line containing the sort names. You can click this
tab to hide aggregate operations.
cgi_p
diff --git a/web/cgi/alpine/1.0/help/tech-notes.html b/web/cgi/alpine/1.0/help/tech-notes.html
index 7f275620..2de3dae7 100644
--- a/web/cgi/alpine/1.0/help/tech-notes.html
+++ b/web/cgi/alpine/1.0/help/tech-notes.html
@@ -23,7 +23,7 @@
<h2>Why Web Alpine</h2>
Web Alpine was originally conceived as a means of providing reliable,
-ubiquitous, and consistent access to UW email facilites via the Interactive
+ubiquitous, and consistent access to UW email facilities via the Interactive
Message Access Protocol (IMAP). As with Pine, it is intended to present a
simple, approachable interface that can be easily navigated with
minimal familiarity. It is also intended to be as efficient as
@@ -101,7 +101,7 @@ built into Alpine, as well as many of the features and functions.
<p>
The Web Alpine application consists of three main components; the CGI scripts that generate pages containing the user's email data,
a serverette running on the http server spanning the life of the user's session, and a couple of libraries
-to aid page generation and serverette communciation.
+to aid page generation and serverette communication.
<p>
Web Alpine is packaged as part of the Alpine Distribution and it's source resides
@@ -166,7 +166,7 @@ the provide, and breakdown as follows:
<td></td>
<td></td>
<td valign=top>Contains source files for Web Alpine's binary components which will be linked
- against the <tt>pith/</tt> libarary components.
+ against the <tt>pith/</tt> library components.
</td>
</td>
</tr>
@@ -231,7 +231,7 @@ that defines where the Web Alpine application was unpacked on your system, and
<dd>
which defines where browsers can find Web Alpine's CGI scripts. This is set to
the null string if the server's DocumentRoot is synonymous with the root of
-Web Alpine's CGI directory. Othewise, it's typically set to the Alias accessed
+Web Alpine's CGI directory. Otherwise, it's typically set to the Alias accessed
subdirectory in the web server's configuration.
</dd>
@@ -264,7 +264,7 @@ a particular user.
<h3>User Configuration</h3>
<p>
Since no user-initiated local file or mailbox access is permitted by (much less compiled into) the <tt>alpined</tt>,
-user configuration and data files are stored using Pine's remote pinerc and address book capabilites. The configuration
+user configuration and data files are stored using Pine's remote pinerc and address book capabilities. The configuration
settings in <tt>web/config/</tt> are used to set per-user defaults and direct Web Alpine toward the user's configuration
settings on the IMAP server. Similarly, the default addressbook is stored as an IMAP folder on the server as well.
Concurrent Web Alpine, Unix Pine and PC-Pine users that would like a consistent mail environment can easily configure their
@@ -324,7 +324,7 @@ templates which were fleshed out via requests to the <tt>alpined</tt> serverette
may draw on its cache of IMAP data, make new requests of the IMAP server, post messages via SMTP or
the local mail queue, formulate LDAP queries, or perform other tasks as required.
<table width="75%" align=center bgcolor="#dddddd"><tr><td>
-Note: Web Alpine sessions run as long as the user's browser requests pages. In the absense of user interaction
+Note: Web Alpine sessions run as long as the user's browser requests pages. In the absence of user interaction
Web Alpine will self-refresh every few minutes to mainain the session. Sessions only end when the user logs out
or closes the browser.
</td></tr></table>
@@ -440,7 +440,7 @@ loop as we roll in many of the features Pine users have come to appreciate.
Performance in terms of both user perceived response time and users per web server are
always a concern, but must, of course, be balanced against additional maintenance and complexity costs.
Less obvious complicating factors must be considered, such as <tt>alpined</tt> process partitioning
-and session-key containing cookie exposure in the face of malicous HTML attachments.
+and session-key containing cookie exposure in the face of malicious HTML attachments.
We plan, of course, to continue exploring various methods to improve performance.
<h2>Appendix: Installation Tests</h2>
diff --git a/web/cgi/alpine/1.0/index.tcl b/web/cgi/alpine/1.0/index.tcl
index 6a0fa543..44cf9014 100755
--- a/web/cgi/alpine/1.0/index.tcl
+++ b/web/cgi/alpine/1.0/index.tcl
@@ -475,7 +475,7 @@ if {$queryexpunge == 1 || [string compare [string tolower $queryexpunge] expunge
source [WPTFScript auth]
set nopage 1
} else {
- lappend newmail [list "Existance test failed: $reason"]
+ lappend newmail [list "Existence test failed: $reason"]
}
} elseif {$reason == 0} {
if {$create == 1 || [string compare create [string tolower $create]] == 0} {
@@ -1486,7 +1486,7 @@ if {![info exists nopage]} {
cgi_table cellspacing=0 cellpadding=0 width="100%" class="itable" {
if {$messagecount < 1} {
- # special case for mailbox with no messges
+ # special case for mailbox with no messages
cgi_table_row {
cgi_table_data class=body valign=middle height=[expr {($ppg + 1) * $indexheight}] {
cgi_center {
diff --git a/web/cgi/alpine/1.0/ldapresult.tcl b/web/cgi/alpine/1.0/ldapresult.tcl
index efdce665..e7e91812 100755
--- a/web/cgi/alpine/1.0/ldapresult.tcl
+++ b/web/cgi/alpine/1.0/ldapresult.tcl
@@ -211,7 +211,7 @@ WPEval $ldap_vars {
if {$qn == -1 && [catch {WPCmd PELdap query $dir $srchstr $ldapfilt} qn]} {
cgi_division align=center "style=\"background-color:white; border: 1px solid goldenrod; margin: 10; padding: 4\"" {
- cgi_puts "A problem has occured while trying to search the directory server."
+ cgi_puts "A problem has occurred while trying to search the directory server."
cgi_br
cgi_br
cgi_puts [cgi_italic [cgi_bold "$qn"]]
@@ -244,7 +244,7 @@ WPEval $ldap_vars {
}
} elseif {[catch {WPCmd PELdap results $qn} results]} {
cgi_division align=center "style=\"background-color:white; border: 1px solid goldenrod; margin: 10; padding: 4\"" {
- cgi_puts "A problem has occured while trying to retrieve the results of your directory search."
+ cgi_puts "A problem has occurred while trying to retrieve the results of your directory search."
cgi_br
cgi_br
cgi_puts [cgi_italic [cgi_bold "$results"]]
diff --git a/web/cgi/alpine/1.0/post.tcl b/web/cgi/alpine/1.0/post.tcl
index dcd7c37b..26428730 100755
--- a/web/cgi/alpine/1.0/post.tcl
+++ b/web/cgi/alpine/1.0/post.tcl
@@ -227,7 +227,7 @@ switch -exact -- $fccattach {
if {0 && [string length $form_charset]} {
# messy charset heuristics
# idea is to look for planted HTML entities and see if known
- # encoding transliterations have occured. inspired by:
+ # encoding transliterations have occurred. inspired by:
# <http://www.cs.tut.fi/~jkorpela/chars.html#encinfo>
# test for:
@@ -288,7 +288,7 @@ if {0 && [string length $form_charset]} {
lappend msgdata [list postoption [list charset "UTF-8"]]
}
-# pass on text fomat=flowed?
+# pass on text format=flowed?
if {[string length $form_flowed]} {
lappend msgdata [list postoption [list flowed yes]]
}
diff --git a/web/cgi/alpine/1.0/select2.tcl b/web/cgi/alpine/1.0/select2.tcl
index 745254e7..4d4cce2c 100755
--- a/web/cgi/alpine/1.0/select2.tcl
+++ b/web/cgi/alpine/1.0/select2.tcl
@@ -68,7 +68,7 @@ WPEval $select_vars {
cgi_table_row {
cgi_table_data {
cgi_center {
- cgi_puts "[cgi_nl][cgi_nl]This page provides a way to search for specific messsages within the currently open folder, [cgi_bold [WPCmd PEMailbox mailboxname]]. Simply fill in the criteria below and click the assoicated [cgi_italic Search] button. All messages matching the criteria will be marked with a check in the box next to their line in the Message List.[cgi_nl][cgi_nl]"
+ cgi_puts "[cgi_nl][cgi_nl]This page provides a way to search for specific messages within the currently open folder, [cgi_bold [WPCmd PEMailbox mailboxname]]. Simply fill in the criteria below and click the associated [cgi_italic Search] button. All messages matching the criteria will be marked with a check in the box next to their line in the Message List.[cgi_nl][cgi_nl]"
cgi_puts "Click [cgi_italic Cancel] to return to the Message List without searching.[cgi_nl]"
}
}
diff --git a/web/cgi/alpine/1.0/seltext.tcl b/web/cgi/alpine/1.0/seltext.tcl
index e0ce33bb..462d48fa 100755
--- a/web/cgi/alpine/1.0/seltext.tcl
+++ b/web/cgi/alpine/1.0/seltext.tcl
@@ -68,7 +68,7 @@ WPEval $select_vars {
cgi_table_row {
cgi_table_data {
cgi_center {
- cgi_puts "[cgi_nl][cgi_nl]This page provides a way to search for specific text in the messsages contained in [cgi_bold [WPCmd PEMailbox mailboxname]]. Enter your selection criteria below, and click [cgi_italic Search]. All messages matching the criteria will be marked with a check in the box next to their line in the Message List."
+ cgi_puts "[cgi_nl][cgi_nl]This page provides a way to search for specific text in the messages contained in [cgi_bold [WPCmd PEMailbox mailboxname]]. Enter your selection criteria below, and click [cgi_italic Search]. All messages matching the criteria will be marked with a check in the box next to their line in the Message List."
cgi_br
cgi_br
cgi_puts "Click [cgi_italic Cancel] to return to the Message List without searching.[cgi_nl][cgi_nl]"
diff --git a/web/cgi/alpine/1.0/spellcheck.tcl b/web/cgi/alpine/1.0/spellcheck.tcl
index ac1f9fe5..da4dd565 100755
--- a/web/cgi/alpine/1.0/spellcheck.tcl
+++ b/web/cgi/alpine/1.0/spellcheck.tcl
@@ -243,7 +243,7 @@ WPEval $query_vars {
if {[info exists problem] || $badcount <= 0} {
cgi_table align=center valign=top height="100%" {
cgi_table_row {
- cgi_table_data align=center valign=bottom heigh="20%" {
+ cgi_table_data align=center valign=bottom height="20%" {
if {[info exists problem]} {
cgi_puts "Problem detected: $problem"
} else {
diff --git a/web/cgi/alpine/1.0/view.tcl b/web/cgi/alpine/1.0/view.tcl
index cf290e43..e4f454b1 100755
--- a/web/cgi/alpine/1.0/view.tcl
+++ b/web/cgi/alpine/1.0/view.tcl
@@ -364,7 +364,7 @@ if {[info exists errstr]} {
if {![info exists nopage]} {
switch -exact -- [WPCmd PEMailbox state] {
readonly {
- lappend newmail [list [cgi_span "style=color: black; margin: 2 ; border: 1px solid red; background-color: pink; font-weight: bold" "Deleted messages may reapper because [WPCmd PEMailbox mailboxname] is Read Only"]]
+ lappend newmail [list [cgi_span "style=color: black; margin: 2 ; border: 1px solid red; background-color: pink; font-weight: bold" "Deleted messages may reappear because [WPCmd PEMailbox mailboxname] is Read Only"]]
}
closed {
lappend newmail [list [cgi_span "style=color: black; border: 1px solid red; background-color: pink; font-weight: bold" "Message body may be blank because [WPCmd PEMailbox mailboxname] is Closed"]]
@@ -917,4 +917,4 @@ if {[info exists errstr]} {
}
}
}
- } \ No newline at end of file
+ }
diff --git a/web/cgi/alpine/1.0/wp.tcl b/web/cgi/alpine/1.0/wp.tcl
index f649ca0a..dc523e1a 100755
--- a/web/cgi/alpine/1.0/wp.tcl
+++ b/web/cgi/alpine/1.0/wp.tcl
@@ -90,7 +90,7 @@ WPEval $wp_vars {
WPCmd PEMessage $uid select [expr [lsearch $uidList $uid] >= 0]
}
- # sourced "page" get's CGI parms from environment
+ # sourced "page" gets CGI parms from environment
if {[catch {WPTFScript $page} source]} {
switch -regexp -- $page {
addredit {
generated by cgit v1.2.3-54-g00ecf (git 2.44.0) at 2024-06-11 07:44:22 +0000