(bdf-generate-font): New argument CHARSET. Give WIDTH

[gnu-emacs] / lisp / progmodes / asm-mode.el

diff --git a/lisp/progmodes/asm-mode.el b/lisp/progmodes/asm-mode.el
index 59035a1afb0925367036505c9f2fa7b3997a3e1a..ef57e339e63a4af6743e49f37e6d6c144e6764ae 100644 (file)
--- a/lisp/progmodes/asm-mode.el
+++ b/lisp/progmodes/asm-mode.el
@@ -49,8 +49,14 @@
 
 ;;; Code:
 
-(defvar asm-comment-char ?;
-  "*The comment-start character assumed by Asm mode.")
+(defgroup asm nil
+  "Mode for editing assembler code."
+  :group 'languages)
+
+(defcustom asm-comment-char ?;
+  "*The comment-start character assumed by Asm mode."
+  :type 'character
+  :group 'asm)
 
 (defvar asm-mode-syntax-table nil
   "Syntax table used while in Asm mode.")
@@ -67,7 +73,7 @@
   (setq asm-mode-map (make-sparse-keymap))
   ;; Note that the comment character isn't set up until asm-mode is called.
   (define-key asm-mode-map ":"         'asm-colon)
-  (define-key f90-mode-map "\C-c;"      'comment-region)
+  (define-key asm-mode-map "\C-c;"      'comment-region)
   (define-key asm-mode-map "\C-i"      'tab-to-tab-stop)
   (define-key asm-mode-map "\C-j"      'asm-newline)
   (define-key asm-mode-map "\C-m"      'asm-newline)
@@ -228,4 +234,6 @@ repeatedly until you are satisfied with the kind of comment."
    )
   (end-of-line))
 
+(provide 'asm-mode)
+
 ;;; asm-mode.el ends here