From: Amul Shah <Amul.Shah@fisglobal.com>
Forwarded: not-needed
Summary: Fix spelling errors in errors messages and MUMPS source routines
Description: Upstream sources contain spelling errors in one message for the
  DSE utility program. This is now fixed to avoid the lintian warning
  spelling-error-in-binary. MUMPS sources are now compiled with -embed_source
  which embeds the source in the object file. Comments in two MUMPS routines
  contained spelling errors. These are now fixed to avoid the lintian warning
  spelling-error-in-binary.
Applied-Upstream: V6.2-001
Last-Update: 2014-10-04

--- a/sr_port/dse_shift.c
+++ b/sr_port/dse_shift.c
@@ -128,7 +128,7 @@
 	{
 		if (shift + size >= cs_addrs->hdr->blk_size)
 		{
-			util_out_print("Error:  block not large enough to accomodate shift.", TRUE);
+			util_out_print("Error:  block not large enough to accommodate shift.", TRUE);
 			t_abort(gv_cur_region, cs_addrs);
 			if (lbp)
 				free(lbp);
--- a/sr_port/rsel.mpt
+++ b/sr_port/rsel.mpt
@@ -122,11 +122,11 @@
 	s end=$p(r,":",2),beg=$p(r,":"),rdf=0
         i end=beg!'$l(end) q:'$l(beg)  s stop=last                                          ; if all stripped out, done
 	s:'$l(beg) beg="*" s pct=$e(beg)                                                    ; CAUTION: ELSE on next line
-        e  s strt=$$mask(beg),stop=$$mask(end) i $l($p(stop,"$")) q:stop']strt              ; if end before begining, done
+        e  s strt=$$mask(beg),stop=$$mask(end) i $l($p(stop,"$")) q:stop']strt              ; if end before beginning, done
         i "*?"[pct s mtch="%*" d start(1) f  s r=$$search(1) q:r]stop!'$l(r)  d save        ; if alls, get _files first
 	s pct=pct="%",mtch=beg
         d start(pct)
-	f  s r=$$search(pct) q:r]stop!'$l(r)  d save                                        ; do begining
+	f  s r=$$search(pct) q:r]stop!'$l(r)  d save                                        ; do beginning
         i stop=last q                                                                       ; no range - we're done
         s stop=$p(stop,"$")
         i $l(stop),stop]$p(strt,"$") d                                                      ; if no overlap, do middle
--- a/sr_port/xcmd.mpt
+++ b/sr_port/xcmd.mpt
@@ -14,7 +14,7 @@
 	; If no $ETRAP defined, use CLIERR^%XCMD overriding a potential $ZTRAP error handler
 	if ""=$ETRAP new $ETRAP set $ETRAP="goto CLIERR^%XCMD"
 	new etrap set etrap=$ETRAP
-	; Protect %XCMD's error handler by NEWing and SETing $ETRAP at the begining of the XECUTEd command
+	; Protect %XCMD's error handler by NEWing and SETing $ETRAP at the beginning of the XECUTEd command
 	xecute "new $ETRAP set $ETRAP=etrap "_$zcmdline
 	quit
 
