/[emacs]/emacs/lisp/textmodes/org.el
ViewVC logotype

Diff of /emacs/lisp/textmodes/org.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.27 by lektu, Mon Jul 4 03:34:51 2005 UTC revision 1.28 by rms, Mon Jul 4 14:24:04 2005 UTC
# Line 999  The default is true, to keep new users f Line 999  The default is true, to keep new users f
999    :group 'org-link    :group 'org-link
1000    :type 'boolean)    :type 'boolean)
1001    
1002  (defconst org-file-apps-defaults-linux  (defconst org-file-apps-defaults-gnu
1003    '((t        . emacs)    '((t        . emacs)
1004      ("jpg"    . "xv %s")      ("jpg"    . "xv %s")
1005      ("gif"    . "xv %s")      ("gif"    . "xv %s")
# Line 1023  The default is true, to keep new users f Line 1023  The default is true, to keep new users f
1023      ("html"   . "netscape -remote openURL(%s,new-window)")      ("html"   . "netscape -remote openURL(%s,new-window)")
1024      ("htm"    . "netscape -remote openURL(%s,new-window)")      ("htm"    . "netscape -remote openURL(%s,new-window)")
1025      ("xs"     . "soffice %s"))      ("xs"     . "soffice %s"))
1026    "Default file applications on a UNIX/LINUX system.    "Default file applications on a GNU-like system.
1027  See `org-file-apps'.")  See `org-file-apps'.")
1028    
1029  (defconst org-file-apps-defaults-macosx  (defconst org-file-apps-defaults-macosx
# Line 1067  and the corresponding command.  Possible Line 1067  and the corresponding command.  Possible
1067  For more examples, see the system specific constants  For more examples, see the system specific constants
1068  `org-file-apps-defaults-macosx'  `org-file-apps-defaults-macosx'
1069  `org-file-apps-defaults-windowsnt'  `org-file-apps-defaults-windowsnt'
1070  `org-file-apps-defaults-linux'."  `org-file-apps-defaults-gnu'."
1071    :group 'org-link    :group 'org-link
1072    :type '(repeat    :type '(repeat
1073            (cons (string :tag "Extension")            (cons (string :tag "Extension")
# Line 5388  If the file does not exist, an error is Line 5388  If the file does not exist, an error is
5388      org-file-apps-defaults-macosx)      org-file-apps-defaults-macosx)
5389     ((eq system-type 'windows-nt)     ((eq system-type 'windows-nt)
5390      org-file-apps-defaults-windowsnt)      org-file-apps-defaults-windowsnt)
5391     ((eq system-type 'linux)     (t org-file-apps-defaults-gnu)))
     org-file-apps-defaults-linux)  
    (t org-file-apps-defaults-linux)))  
5392    
5393  (defun org-expand-file-name (path)  (defun org-expand-file-name (path)
5394    "Replace special path abbreviations and expand the file name."    "Replace special path abbreviations and expand the file name."
# Line 9048  When LEVEL is non-nil, increase section Line 9046  When LEVEL is non-nil, increase section
9046  (define-key org-mode-map (org-key 'S-left)  'org-timestamp-down-day)  (define-key org-mode-map (org-key 'S-left)  'org-timestamp-down-day)
9047  (define-key org-mode-map (org-key 'S-right) 'org-timestamp-up-day)  (define-key org-mode-map (org-key 'S-right) 'org-timestamp-up-day)
9048  (define-key org-mode-map "\C-c-"          'org-table-insert-hline)  (define-key org-mode-map "\C-c-"          'org-table-insert-hline)
9049  ;; The following line is e.g. necessary for German keyboards under Suse Linux  ;; The following line is necessary for German keyboards under Suse GNU/Linux
9050  (unless org-xemacs-p  (unless org-xemacs-p
9051    (define-key org-mode-map [S-iso-lefttab]  'org-shifttab))    (define-key org-mode-map [S-iso-lefttab]  'org-shifttab))
9052  (define-key org-mode-map [(shift tab)]    'org-shifttab)  (define-key org-mode-map [(shift tab)]    'org-shifttab)

Legend:
Removed from v.1.27  
changed lines
  Added in v.1.28

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26