Re: bug report

Jerry James writes: > William Estrada<MrUmunhum(a)popdial.com> wrote: > >> Dear Bug Team! > >> line number and colunms are not displayed even with: > >> > >> (setq column-number-mode t) > >> (setq line-number-mode t) > >> in my init.el file XEmacs is behaving correctly here. The mode *variables* are internal, and are not intended to be set by users. If setting them works to control any given mode, that's just luck. To turn on modes in init.el, use the *functions* (column-number-mode 1) (line-number-mode 1)

(turn them off with `(column-number-mode -1)', etc). Alternatively, > try M-x customize-variable line-number-mode (and ditto for > column-number-mode). Does that work for you?

which *should* work (without restarting XEmacs) because customize-variable *should* know that these are mode variables and set things up correctly for you. If it doesn't work I would consider that a bug in the defcustom declarations. Finally, you should be able to set the option by using the Options menu: Options -> Display -> Line Numbers and similarly for Column Numbers.

;; Are we running XEmacs or Emacs? (defvar running-xemacs (string-match "XEmacs\\|Lucid" emacs-version)) (setq default-process-coding-system '(utf-8 . raw-text))' (global-set-key [delete] 'delete-char) (global-set-key [kp-delete] 'delete-char) (column-number-mode 1) (line-number-mode 1) (require 'cc-mode) (require 'setnu) (define-key c-mode-map [delete] 'delete-char) (setq require-final-newline t) (setq next-line-add-newlines nil) ;; Enable wheelmouse support by default (if (not running-xemacs) (require 'mwheel) ; Emacs (mwheel-install) ; XEmacs ) (setq column-number-mode t) (setq line-number-mode t) (setq next-line-add-newlines t ) (setq indent-tabs-mode nil) (setq tab-width 2 ) (setq goal-column 1 ) (setq standard-indent 2 ) (setq delete-key-deletes-forward 1 ) (setq paren-ding-unmatched t ) (setq paren-mode 'blink-paren ) (setq tpu-set-cursor-bound nil ) (global-set-key [f2] 'save-buffer) (global-set-key [f3] 'kill-this-buffer) (global-set-key [f12] 'rotate-buffer) (global-set-key ' (control f12) 'comment-region) (global-set-key ' (control e) 'kill-line) (global-set-key ' (control f3) 'delete-screen) (global-set-key ' (control backspace) 'kill-line) (global-set-key ' (control return) 'split-line) (global-set-key ' (control up) 'transpose-line-up) (global-set-key ' (control down) 'transpose-line-down) (global-set-key ' (control k) 'copy-from-above-command) (global-set-key ' (control left) 'shift-region-right) (global-set-key ' (control right) 'shift-region-left) (global-set-key ' (control delete) 'delete-region) (global-set-key ' (control tab) 'switch-to-next-buffer) (global-set-key ' (meta return) 'newline-and-indent) (global-set-key ' (alt j) 'delete-indentation) (global-set-key [return] 'my-return) (global-set-key ' (kp-insert) 'my-return) (set-face-foreground 'default (list "green" "green" ) ) (set-face-background 'default (list "black" "black" ) ) (set-face-background 'zmacs-region "yellow" ) (set-face-foreground 'zmacs-region "black" ) ;; (set-cursor-color '"white" ) (set-face-underline-p 'default nil ) (set-face-highlight-p 'default nil 'global 'tty) (set-face-reverse-p 'default nil 'global 'tty) (turn-on-pending-delete) (add-hook 'c-mode-common-hook ' (lambda () (setq c-basic-offset 2))) (paren-set-mode 'paren) ;; (paren-set-mode 'sexp) (defun shift-region-left (arg) (interactive "*p") (indent-rigidly (region-beginning) (region-end) 1)) (defun shift-region-right (arg) (interactive "*p") (indent-rigidly (region-beginning) (region-end) -1)) (defun my-return (arg) "Make Xemacs return to beginning of next line" (interactive "*p") (next-line arg) (beginning-of-line)) (custom-set-faces ' (default ( (t (:size "14pt"))) t)) (setq minibuffer-max-depth nil) (defun interactive-blink-matching-open () "Indicate momentarily the start of sexp before point." (interactive) (let ((blink-matching-paren-distance (buffer-size)) (blink-matching-paren t)) (blink-matching-open)))