From 395b97272edb41560337ad31206c25d1336c2155 Mon Sep 17 00:00:00 2001 From: Nick Roberts Date: Sat, 6 Mar 2004 12:02:25 +0000 Subject: [PATCH] (gdb-assembler-mode, gdb-assembler-custom): Set up overlay arrow string properly for the assembler buffer. --- lisp/gdb-ui.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/gdb-ui.el b/lisp/gdb-ui.el index 85b03fbce40..de566902ec7 100644 --- a/lisp/gdb-ui.el +++ b/lisp/gdb-ui.el @@ -1831,7 +1831,6 @@ BUFFER nil or omitted means use the current buffer." (if (re-search-forward gdb-current-address nil t) (progn (setq pos (point)) - (setq gdb-overlay-arrow-string "=>") (beginning-of-line) (or gdb-overlay-arrow-position (setq gdb-overlay-arrow-position (make-marker))) @@ -1871,6 +1870,7 @@ BUFFER nil or omitted means use the current buffer." (setq major-mode 'gdb-assembler-mode) (setq mode-name "Machine") (push 'gdb-overlay-arrow-position overlay-arrow-variable-list) + (put 'gdb-overlay-arrow-position 'overlay-arrow-string "=>") (setq gdb-overlay-arrow-position nil) (setq fringes-outside-margins t) (setq buffer-read-only t) -- 2.39.5