summaryrefslogtreecommitdiff
path: root/lisp/dos-fns.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/dos-fns.el')
-rw-r--r--lisp/dos-fns.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/dos-fns.el b/lisp/dos-fns.el
index ebb8acb8608..aeb8da4d480 100644
--- a/lisp/dos-fns.el
+++ b/lisp/dos-fns.el
@@ -269,7 +269,7 @@ returned unaltered."
(car where)
(if (zerop (cdr where))
(logior (logand tem 65280) value)
- (logior (logand tem 255) (lsh value 8))))))
+ (logior (logand tem 255) (ash value 8))))))
((numberp where)
(aset regs where (logand value 65535))))))
regs)