Anonymous avatar Anonymous committed d5b7a70

Martin's Monster Mega typo patch

Comments (0)

Files changed (12)

+2000-10-05  Martin Buchholz  <martin@xemacs.org>
+
+	* *: Mega typo fix.
+
 1999-07-22  Jan Vroonhof  <vroonhof@math.ethz.ch>
 
 	* hm--html-menu.el: Support for psgml using get-popup-menu-response. 
 	this change.
 15.08.98
 	Addition by Guido.Van.Hoecke@bigfoot.com  on 1998-07-06:
-	Besides the funcion hm--date, a function hm--date-time
+	Besides the function hm--date, a function hm--date-time
 	is defined that will also return the time if
 	hm--hmtl-include-time-after-date is not nil. The time
         will than be returned in the format "hours:minutes" like
 	-- BUILDED the version 5.8 of the package --
 19.07.97
 	The minor mode (hm--html-minor-mode) in the Emacs 19 has now
-	an entry to get the major mode menu - propably not the best
+	an entry to get the major mode menu - probably not the best
 	solution, but better than nothing.
 	Updated the Texinfo documentation.
 17.07.97
 	thanks to Guylaine Prat <prat@cisi.cnes.fr>, for the bug report.
 	Added the variables `hm--html-automatic-changed-comment-prefix',
 	`hm--html-automatic-created-comment-prefix' and
-	`hm--html-automatic-comment-infix' to make the automatic insertation
+	`hm--html-automatic-comment-infix' to make the automatic insertion
 	of created and changed comments more flexible.
 	Added the command `hm--html-insert-modified-line' and the 
 	variables `hm--html-automatic-create-modified-line',
 	`tmpl-util-indent-buffer', which are useful utilities in
 	template files.
 	Changed frame.html.tmpl and command-description.html.tmpl, so that
-	they now will be indented after their insertation.
+	they now will be indented after their insertion.
 28.03.97
 	Fixed the commands `idd-mouse-drag-and-drop-click' and
 	`idd-mouse-drag-and-drop-press-button-during-move' for the Emacs 19.
 	A help feature was implemented.
 30.01.97:
 	Added some new features to the drag and drop interface, like
-	the macro `idd-start-mouse-drag-and-drop', which is usefull to
+	the macro `idd-start-mouse-drag-and-drop', which is useful to
 	define action functions. The event is now also stored in the source
 	and destination description.
 	Changed the order of the arguments destination and source
 	`tmpl-filter-regexp' and `tmpl-history-variable-name'
 	instead of optional arguments.
 	Changed the name of the file frame.html to frame.html.tmpl. This is
-	usefull, if you've templates for multiple modes in one directory and
+	useful, if you've templates for multiple modes in one directory and
 	you want to use the new filter feature of the command
 	`tmpl-insert-template-file-from-fixed-dirs'.
 	Changed the function `hm--html-insert-template' and added
 mode: text
 minor-mode: auto-fill-mode
 fill-prefix: "	"
-End:
+End:
 
 (if (not (fboundp 'file-remote-p))
     (defun file-remote-p (file)
-      "Test wether file resides on the local system.
-The special value 'unknown is returned if no remote file acess package
+      "Test whether file resides on the local system.
+The special value 'unknown is returned if no remote file access package
 has been loaded."
       (if (not (featurep 'ange-ftp))
 	  (require 'ange-ftp))
       (if (not (fboundp 'defcustom))
 	  (defmacro defcustom (symbol value doc &rest args)
 	    "Simulates the defcustom definition from the custom package.
-It calles a `defvar' with the arguments SYMBOL, VALUE and DOC."
+It calls a `defvar' with the arguments SYMBOL, VALUE and DOC."
 	    `(defvar ,symbol ,value ,doc)))
 
 	

hm--html-configuration.el

   :group 'hm--html)
 
 (defgroup hm--html-document-information nil
-  "Variables relating to the insertation of document information.
+  "Variables relating to the insertion of document information.
 This contains the user name of the document author, his signature,
 the creation and change dates, the HTML doctype and the meta element."
   :group 'hm--html)
   :group 'hm--html)
 
 (defgroup hm--html-links nil
-  "Variables relating to the insertation of links."
+  "Variables relating to the insertion of links."
   :group 'hm--html)
 
 (defgroup hm--html-templates nil
 ;;; For mailto links
 
 (defcustom hm--html-mailto-alist '(("muenkel@tnt.uni-hannover.de"))
-  "*Alist with mail adresses for the mailto alist.
+  "*Alist with mail addresses for the mailto alist.
 The value of `user-mail-address' will also be added by the package to
 this alist."
   :group 'hm--html-links
 	    "/")
     'IMAGE))
   "*Alist with URL's for FORMS and IMAGE tags. 
-The cdr of each list contains symbols, which specifys the use of the
+The cdr of each list contains symbols, which specify the use of the
 URL."
   :group 'hm--html-links
   :type '(repeat cons))
 
 ;;; for deleting the automounter path-prefix
 (defcustom hm--html-delete-wrong-path-prefix '("/tmp_mnt" "/phys/[^/]+")
-  "If non nil, it specifies path-prefixes, which should be deleted in pathes.
+  "If non nil, it specifies path-prefixes, which should be deleted in paths.
 The Sun automounter adds a temporary prefix to the automounted directories
  (At our site the prefix is /tmp_mnt). But you can't select such a path, if 
 the automounter has currently not mounted the directory and so you can't
 follow a html-link, which consists of such a path. To overcome this behaviour,
 you can set this variable to the prefix (eg. \"/tmp_mnt\"). After that, the
-prefix should be stripped from the pathes during the creation of the links.
+prefix should be stripped from the paths during the creation of the links.
 ATTENTION: This variable is used as regular expression !
 It can be set to a string or to a list of strings."
   :group 'hm--html-links
   :type '(repeat string))
 
 
-;;; For insertation of created and changed comments and automatic
+;;; For insertion of created and changed comments and automatic
 ;;; date update in the title line and a visible modification date
 
 (defcustom hm--html-automatic-create-title-date t
 
 (defcustom hm--html-automatic-changed-comment t
   "*t   => A \"changed comment\" line will be added before filesaving.
-nil => No automatic insertation of a \"changed comment\" line."
+nil => No automatic insertion of a \"changed comment\" line."
   :group 'hm--html-document-information
   :type 'boolean)
 
 
 (defcustom hm--html-automatic-created-comment t
   "*t   => A \"created comment\" line will be added.
-nil => No automatic insertation of a \"created comment\" line."
+nil => No automatic insertion of a \"created comment\" line."
   :group 'hm--html-document-information
   :type 'boolean)
 

hm--html-drag-and-drop.el

 					    destination))
 
 (defun hm--html-idd-add-html-link-from-w3-buffer-point (source destination)
-  "Inserts a link at DESTINATION to a lin in the w3 buffer.
+  "Inserts a link at DESTINATION to a link in the w3 buffer.
 The link in the w3-buffer is specified by the SOURCE.
 Note: Relative links are currently not supported for this function."
   (idd-set-point destination)
   )
 
 (defvar hm--html-noregion-formatting-word-map nil
-  "Norgion sub keymap for inserting physical text formatting elements.")
+  "Noregion sub keymap for inserting physical text formatting elements.")
 
 (if hm--html-noregion-formatting-word-map
     ()

hm--html-mode.texi

 The package provides a minor mode called @code{hm--html-minor-mode},
 which could be used to join the features of this package with other HTML
 packages or use it's features in other major edit modes. This is
-usefull, if you'd like to extend another HTML mode or if you'll write
+useful, if you'd like to extend another HTML mode or if you'll write
 program code, which contain HTML parts.
 
 Currently this is tested with the psgml-html mode, the @code{perl-mode}
 @code{idd-mouse-pointer-image}: The name of the xbm file with the mouse
 pointer image. By default this is the file @file{drop}. There exists
 also a file called @file{dropmsk}, which contains the mask image. The
-mask file is loaded automaticly.
+mask file is loaded automatically.
 
 @item
 @code{idd-data-directory}: The name fo the directory, where the file

hm--html-not-standard.el

 ;;; 
 ;;; Description:
 ;;;
-;;;	This file contains lisp code for the insertation of non standard
+;;;	This file contains lisp code for the insertion of non standard
 ;;;	HTML 3.2 elements. I don't think, that's a good idea to use this
 ;;;	elements in any HTML documents :-)
 ;;; 
 			  function-insert-middle-end-tag
 			  middle-end-tag)
   "Adds the start and the end html tag at point.
-The first parameter specifies the funtion which insert the start tag
-and the third parameter specifies the function which insert the end tag.
+The first parameter specifies the function which inserts the start tag
+and the third parameter specifies the function which inserts the end tag.
 The second parameter is the string for the start tag and the fourth parameter
 is the string for the end tag. The third and fourth parameters are optional.
 The fifth parameter is optional. If it exists, it specifies a function which
 				    function-insert-middle-tag
 				    middle-tag)
   "Adds the start and the end html tag to the active region.
-The first parameter specifies the funtion which insert the start tag
+The first parameter specifies the function which insert the start tag
 and the third parameter specifies the function which insert the end tag.
 The second parameter is the string for the start tag and the fourth parameter
 is the string for the end tag.
   "History variable for reading the shape of an image map.")
 
 (defun hm--html-read-shape ()
-  "Reads the shap for an area element."
+  "Reads the shape for an area element."
   (upcase(completing-read "The shape of the area: "
 			  '(("rect") ("circle") ("poly"))
 			  nil
 If the ALIST is nil and DEFAULT is nil, then the function only reads
 a filename (without path). These precede the following.
 If the ALIST isn't nil, the function lists the contents of the ALIST
-in a buffer and reads a number from the minbuffer, which selects one
+in a buffer and reads a number from the minibuffer, which selects one
 of the directories (lines) of the buffer. Therefore the ALIST must look
 like the following alist:
 	((1 . \"/appl/gnu/\") (2 . \"/\"))
 
 (defun hm--html-add-table-header (no-of-cells)
   "Adds the HTML tags for a complete simple table header line.
-It asks for the number of cells and the allignment of the cells.
+It asks for the number of cells and the alignment of the cells.
 The number of cells can also be given as prefix argument."
   (interactive "NNo of cells in a row: ")
   (if (< no-of-cells 1)
 
 (defun hm--html-add-first-table-row (no-of-cells)
   "Adds the HTML tags for a table row.
-It asks for the number of cells and the allignment of the cells.
+It asks for the number of cells and the alignment of the cells.
 The number of cells can also be given as prefix argument."
   (interactive "NNo of cells in a row: ")
   (if (< no-of-cells 1)
 ;					glyph-invisible-flag)
 ;  "Make the region invisible and attach a glyph STRING.
 ;The invisible flags could be used, to toggle the visibility."
-;  (mapcar 'delete-annotation (annotations-at end)) ; delete old anotations
+;  (mapcar 'delete-annotation (annotations-at end)) ; delete old annotations
 ;  ;; delete old extents
 ;  (let ((extent (make-extent start end))
 ;	(annotation nil))
 
 
 ;;;
-;   some other usefull functions
+;   some other useful functions
 ;  
 
 (defun hm--html-remove-numeric-names ()
 (defun hm--html-load-config-files ()
   "Load the html configuration files.
 First, the system config file (detemined by the environment variable
-HTML_CONFIG_FILE; normaly hm--html-configuration.el(c)) is loaded.
+HTML_CONFIG_FILE; normally hm--html-configuration.el(c)) is loaded.
 At second a site config file is loaded, if the environment variable
 HTML_SITE_CONFIG_FILE or the lisp variable `hm--html-site-config-file'
 is set to such a file and if the emacs wasn't started with the 
 flag -no-site-file.
 At least the user config file (determined by the environment variable
-HTML_USER_CONFIG_FILE; normaly the file ~/.hm--html-configuration.el(c)).
+HTML_USER_CONFIG_FILE; normally the file ~/.hm--html-configuration.el(c)).
 If no HTML_CONFIG_FILE exists, then the file hm--html-configuration.el(c)
 is searched in one of the lisp load path directories.
 If no HTML_USER_CONFIG_FILE exists, then the variable 
 
 (defvar html-view-wait-counter 100000
   "*Counter for a wait loop.
-The wait loop is beween the start of the Mosaic and the command 
+The wait loop is between the start of the Mosaic and the command 
 `set-process-sentinel'. If Mosaic don't start, then you must set
 this value higher. You can try to set it to a lower number otherwise.")
 

internal-drag-and-drop.el

 
 The <specification-type> - functions must have two arguments, the first one
 is the source or destination and the second is the <value>. It must return
-nil, if the test wasn't successfull and a number (in general 1), which 
+nil, if the test wasn't successful and a number (in general 1), which 
 specifies the weight of the test function. The weights of all single tests
 are added to a summary weight and assigned to the action. The action
 with the highest weight is called from the action handler. Look at
 the definition of `idd-if-major-mode-p', `idd-if-minor-mode-p' and so on for
 examples. Look at the function `idd-get-source-or-destination-alist', if
-you wan't to know the structure of the 'source-or-destination' argument
+you want to know the structure of the 'source-or-destination' argument
 of these functions.
 
 The <destination-specification> looks like <source-specification>,
 to define a general `idd-actions' list, where the destination mode is
 specified by `idd-if-major-mode-p'.
 
-<action> ist a function, which has two arguments, the first specifies the
+<action> is a function, which has two arguments, the first specifies the
 source and the second the destination. Look at the function definition
 of `idd-action-copy-region' and `idd-action-copy-replace-region'. They are 
 examples for such actions."
 (defun idd-if-dired-file-on-line-p (source-or-destination filename-regexp)
   "Checks, if the filename on the line match FILENAME-REGEXP.
 The function `dired-get-filename' is used, to get the filename from
-the SOURCE-OR-DESTINATION. It returns 1, if it matchs or nil."
+the SOURCE-OR-DESTINATION. It returns 1, if it matches or nil."
   (let ((case-fold-search t))
     (if (and (idd-get-dired-filename-from-line source-or-destination)
 	     (string-match filename-regexp
 (defun idd-if-modifiers-p (source-or-destination modifiers)
   "Checks, if the MODIFIERS hold during selecting the SOURCE-OR-DESTINATION.
 Returns 1, if the list MODIFIERS contains the same modifiers,
-or if any modyfiers are hold and MODIFIERS is t,
-or if no modyfiers are hold and MODIFIERS is nil.
+or if any modifiers are hold and MODIFIERS is t,
+or if no modifiers are hold and MODIFIERS is nil.
 Otherwise nil is returned."
   (let ((event-modifiers (event-modifiers
 			  (cdr (assoc ':event source-or-destination)))))
 					    &key
 					    do-in-source
 					    do-in-destination)
-  "Macro, usefull for the definition of action functions.
+  "Macro, useful for the definition of action functions.
 Look at the example `idd-action-move-region'."
   `(progn
      (if (idd-if-region-active-p ,source t)

tmpl-minor-mode.el

 		 (repeat directory)))
 
 (defcustom tmpl-automatic-expand t
-  "*An inserted template will be automaticly expanded, if this is t.
+  "*An inserted template will be automatically expanded, if this is t.
 
 This variable is used in the commands for inserting templates.
 Look at `tmpl-insert-template-file-from-fixed-dirs' and
 
 
 (defvar tmpl-white-spaces " 	
-
+" "String with white spaces.")
 
 
 (defmacro tmpl-save-excursion (&rest body)
 FILTER-REGEXP can be used to allow only the selecting of files,
 which are matching the regexp. If FILTER-REGEXP is nil, then the
 Filter \".*\\.tmpl$\" is used.
-HISTROY-VARIABLE contains the last template file names."
+HISTORY-VARIABLE contains the last template file names."
   (let ((filter (or filter-regexp ".*\\.tmpl$"))
 	(directories (or template-dirs (list (default-directory))))
 	(table nil)
   "It evaluates (loads) the template-configuration-file, if there is one.
 The name of the file is determined by the variable 
 `tmpl-template-configuration-file'. The file must contain valid Emacs lisp
-code. The file will be search at first in the current directoy, then in
-it's parent directory and so on, until the file is found or the root directory
+code. The file will be searched at first in the current directory, then in
+its parent directory and so on, until the file is found or the root directory
 is reached."
   (if tmpl-template-configuration-file
       (tmpl-eval-template-configuration-file-1 tmpl-template-configuration-file
 
 ;;; General utilities, which are useful in a template file
 (defun tmpl-util-indent-region (begin end)
-  "Indents a region acording to the mode."
+  "Indents a region according to the mode."
   (interactive "r")
   (save-excursion
     (goto-char end)
 	(forward-line)))))
 
 (defun tmpl-util-indent-buffer ()
-  "Indents the whole buffer acording to the mode."
+  "Indents the whole buffer according to the mode."
   (interactive)
   (tmpl-util-indent-region (point-min) (point-max)))
 
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.