Anonymous avatar Anonymous committed 1f759f5

Martin's Monster Mega typo patch

Comments (0)

Files changed (6)

+2000-10-05  Martin Buchholz  <martin@xemacs.org>
+
+	* *: Mega typo fix.
+
 2000-07-27  Ben Wing  <ben@xemacs.org>
 
 	* flyspell.el (setq ispell-library-path nil): hack so that this
 ;;; name (crontab-filename) and then removes the crontab buffer.
 
 (defun crontab-save ()
-  "Submit the edited crontab to the cron deamon for processing"
+  "Submit the edited crontab to the cron daemon for processing."
 
   (goto-char (point-min))
   (while (not (eobp))
 (defun flyspell-delay-command (command)
   "Set COMMAND to be delayed, for Flyspell.
 When flyspell `post-command-hook' is invoked because a delayed command
-as been used the current word is not immediatly checked.
+as been used the current word is not immediately checked.
 It will be checked only after `flyspell-delay' seconds."
   (interactive "SDelay Flyspell after Command: ")
   (put command 'flyspell-delayed t))
 ;; X.x   Aug 23 1995  19.28             [jari  1.13]
 ;; - 19.28 Byte compile doesn't handle fboundp, boundp well. That's a bug.
 ;;   Set some dummy functions to get cleaner output.
-;; - The folding-mode-off doesn't seem very usefull, because it
+;; - The folding-mode-off doesn't seem very useful, because it
 ;;   is never run when another major-mode is turned on ... maybe we should
 ;;   utilize kill-all-local-variables-hooks with defadvice around
 ;;   kill-all-local-variables ...
 ;;{{{ setup: byte compiler hacks
 
 ;;; ............................................. &byte-compiler-hacks ...
-;;; - This really only should be evaluted in case we're about to byte
+;;; - This really only should be evaluated in case we're about to byte
 ;;;   compile this file.  Since `eval-when-compile' is evaluated when
 ;;;   the uncompiled version is used (great!) we test if the
 ;;;   byte-compiler is loaded.
 
 (defcustom folding-goto-key "\M-g"
   "*Key to be bound to `fold-goto-line' in folding mode.
-The default value is M - g, but you propably don't want folding to
+The default value is M - g, but you probably don't want folding to
 occupy it if you have used M - g got `goto-line'."
   :type 'string  :group 'folding)
 
   )
 
 (defcustom fold-enter-on-goto t
-  "*Flag in folding adviced fucntion `goto-line'
+  "*Flag in folding adviced function `goto-line'
 If non-nil, folds are entered when going to a given line.
 Otherwise the buffer is unfolded. Can also be set to 'show.
 This variable is used only if `fold-advice-instantiate' was
       (goto-char point)
       ;;  This call breaks if there is no marks on the point,
       ;;  because there is no parametesr 'nil t' in call.
-      ;;  --> there is error in this fucntion if that happens.
+      ;;  --> there is error in this function if that happens.
       ;;
       (beginning-of-line)
       (re-search-forward (concat bm "\\|" em))
       )
      (t
       (if (interactive-p)
-	  (message "point is not at fold beginnning."))
+	  (message "point is not at fold beginning."))
       ))
     ))
 
  {{{ FoldHeader-COM-
 
  If the fold header has -COM- at the end, then the fold is supposed to
- be commented. And if there is no -COM- then fold will be consideres
+ be commented. And if there is no -COM- then fold will be considered
  as normal fold. Do not loose the or add the -COM- yourself or it will
  confuse the state of the fold."
   (interactive "P")
 This function replaces all fold marks }}} and {{{
 with major mode's fold marks.
 
-As a side effecs also corrects all foldings to standard notation.
+As a side effect, also corrects all foldings to standard notation.
 Eg. following ,where correct fold-beg should be \"#{{{ \"
 Note that /// marks foldings.
 
   (if fold-allow-overlays
       (if fold-xemacs-p
 	  ;;  See if we can load overlay.el library that comes in 19.15
-	  ;;  This call returns t or nil if load was successfull
+	  ;;  This call returns t or nil if load was successful
 	  ;;  Note: is there provide statement? Load is so radical
 	  ;;
 	  (load "overlay" 'noerr)

whitespace-mode.el

 ;;	`whitespace-blank-face' and `whitespace-tab-face'.
 ;;	Use the command `whitespace-show-faces' to show their values.
 ;;	In this mode only these tabs and blanks are highlighted, which are in 
-;;	the region from (point) - (window-heigh) to (point) + (window-heigh)."
+;;	the region from (point) - (window-height) to (point) + (window-height)."
 
 ;;; Code:
 
 	       to))
 
 (defun whitespace-incremental-highlight (from to)
-  "Highligthts the region from FROM to TO incremental."
+  "Highlights the region from FROM to TO incremental."
   (save-excursion
     (goto-char from)
     (let ((extent (extent-at (point) nil 'whitespace-highlighted-region))
 `whitespace-blank-face' and `whitespace-tab-face'.
 Use the command `whitespace-show-faces' to show their values.
 In this mode only these tabs and blanks are highlighted, which are in 
-the region from (point) - (window-heigh) to (point) + (window-heigh)."
+the region from (point) - (window-height) to (point) + (window-height)."
   (interactive "P")
   (setq whitespace-incremental-mode
 	(if (null arg) (not whitespace-incremental-mode)
   C-h		backward-char
   C-i		indent-for-tab-command
   C-j		help-for-help
-  C-k		ordstar-C-k-map
+  C-k		wordstar-C-k-map
   C-l		ws-repeat-search
   C-n		open-line
   C-p		quoted-insert
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.