diff --git a/2ch/board.l b/2ch/board.l
index be5c0b4..3aba116 100755
--- a/2ch/board.l
+++ b/2ch/board.l
@@ -290,7 +290,7 @@
   (set-text-attribute (point)
              (progn
            ;(insert (format nil (format nil "~~~D@A" *board-title-width*) title))
-           (insert (format nil "~V@A" *board-title-width* title))
+           (insert (format nil "~VA" *board-title-width* title))
            (point))
              'title
              :foreground *board-fgcolor-title*
@@ -309,7 +309,7 @@
   )
   (set-text-attribute (point)
              (progn
-           (insert (format nil "  ~V@A" *board-name-width* (format nil "[~A]" name)))
+           (insert (format nil "  ~VA" *board-name-width* (format nil "[~A]" name)))
            (point))
              'name
              :foreground *board-fgcolor-name*
@@ -318,7 +318,7 @@
   )
   (set-text-attribute (point)
              (progn
-           (insert (format nil "~V@A"
+           (insert (format nil "~VA"
                    *board-date-width*
                    (if wtime
                        (format nil "[~A]" (view-format-date wtime
diff --git a/2ch/menu.l b/2ch/menu.l
index cb73313..f1d7a93 100755
--- a/2ch/menu.l
+++ b/2ch/menu.l
@@ -884,7 +884,7 @@
 (defun menu-insert-category (name open-p)
   (set-text-attribute (point)
              (progn
-           (insert (format nil "~22@A~%"
+           (insert (format nil "~22A~%"
                    (format nil "~:[+~;-~][~A]" open-p name)))
            (point))
              'name
@@ -895,7 +895,7 @@
 (defun menu-insert-menu (name)
   (set-text-attribute (point)
              (progn
-           (insert (format nil "  ~20@A~%" name))
+           (insert (format nil "  ~20A~%" name))
            (point))
              'board
              :foreground *menu-fgcolor*