GNU bug report logs - #10452
24.0.92; calendar-abbrev-length in calendar.el

Previous Next

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 10452 in the body.
You can then email your comments to 10452 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: Peter Dyballa <Peter_Dyballa <at> Freenet.DE>
To: bug-gnu-emacs <at> gnu.org
Subject: 24.0.92; calendar-abbrev-length in calendar.el
Date: Sun, 8 Jan 2012 11:59:02 +0100

Hello!

The introduction of this variable is no good idea. In German we are using two values: the number 2 for day names and the number 3 for month names.

--
Greetings

  Pete

To most people solutions mean finding the answers. But to chemists solutions
are things that are still all mixed up.

Message #8 received at 10452 <at> debbugs.gnu.org (full text, mbox):

From: Andreas Schwab <schwab <at> linux-m68k.org>
To: Peter Dyballa <Peter_Dyballa <at> Freenet.DE>
Cc: 10452 <at> debbugs.gnu.org
Subject: Re: bug#10452: 24.0.92; calendar-abbrev-length in calendar.el
Date: Sun, 08 Jan 2012 13:30:23 +0100

Peter Dyballa <Peter_Dyballa <at> Freenet.DE> writes:

> The introduction of this variable is no good idea. In German we are using two values: the number 2 for day names and the number 3 for month names.

You can set calendar-day-abbrev-array to anything you like.

Andreas.

-- 
Andreas Schwab, schwab <at> linux-m68k.org
GPG Key fingerprint = 58CA 54C7 6D53 942B 1756  01D3 44D5 214B 8276 4ED5
"And now for something completely different."

Message #17 received at 10452-done <at> debbugs.gnu.org (full text, mbox):

From: Glenn Morris <rgm <at> gnu.org>
To: 10452-done <at> debbugs.gnu.org
Subject: Re: bug#10452: 24.0.92; calendar-abbrev-length in calendar.el
Date: Sun, 08 Jan 2012 14:19:55 -0500

tags 10452 notabug wontfix
severity 10452 wishlist
stop

Andreas Schwab wrote:

> Peter Dyballa <Peter_Dyballa <at> Freenet.DE> writes:
>
>> The introduction of this variable is no good idea.

It exists since Emacs 22.

> You can set calendar-day-abbrev-array to anything you like.

Indeed. calendar-abbrev-length only provides a default set of
abbreviations. I'm not going to introduce separate length variables for
days and months.

Message #20 received at submit <at> debbugs.gnu.org (full text, mbox):

From: Kevin Rodgers <kevin.d.rodgers <at> gmail.com>
To: bug-gnu-emacs <at> gnu.org
Subject: Re: bug#10452: 24.0.92; calendar-abbrev-length in calendar.el
Date: Wed, 11 Jan 2012 22:55:22 -0700

On 1/8/12 5:30 AM, Andreas Schwab wrote:
> Peter Dyballa<Peter_Dyballa <at> Freenet.DE>  writes:
>
>> The introduction of this variable is no good idea. In German we are using two values: the number 2 for day names and the number 3 for month names.
>
> You can set calendar-day-abbrev-array to anything you like.

Here's some code I posted in 2006 to automatically set localized day and month 
names.  To set localized abbrevs, just use the lowercase "%a" and "%b" formats
instead.

(let ((days (locale-info 'days))
      (months (locale-info 'months)))
  (if days
      (setq calendar-day-name-array days)
    (let ((this-year
           (string-to-number (format-time-string "%Y")))
          (this-month
           (string-to-number (format-time-string "%m"))))
      (setq calendar-day-name-array
            (apply 'vector
                   (mapcar (lambda (time)
                             (format-time-string "%A" time))
                           (sort (mapcar (lambda (day)
                                           (encode-time 0 0 0 day
                                                        this-month this-year
                                                        0))
                                         '(1 2 3 4 5 6 7))
                                 ;; by day of week:
                                 (lambda (time-1 time-2)
                                   (< (nth 6 (decode-time time-1))
                                      (nth 6 (decode-time time-2))))))))))
  (if months
      (setq calendar-month-name-array months)
    (let ((this-year
           (string-to-number (format-time-string "%Y"))))
      (setq calendar-month-name-array
            (apply 'vector
                   (mapcar (lambda (month)
                             (let ((first (encode-time 0 0 0 1 month
                                                       this-year
                                                       0)))
                               (format-time-string "%B" first t)))
                           '(1 2 3 4 5 6 7 8 9 10 11 12)))))))


-- 
Kevin Rodgers
Denver, Colorado, USA

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.