Mercurial > emacs
comparison lisp/net/tramp.el @ 79714:6888fd3398e8
Add 2008 to copyright years.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Mon, 07 Jan 2008 01:56:16 +0000 |
parents | 3e6cbd5009b5 |
children | 24a171b96a66 107ccd98fa12 |
comparison
equal
deleted
inserted
replaced
79713:3c2488d0ebd9 | 79714:6888fd3398e8 |
---|---|
1 ;;; -*- mode: Emacs-Lisp; coding: iso-2022-7bit; -*- | 1 ;;; -*- mode: Emacs-Lisp; coding: iso-2022-7bit; -*- |
2 ;;; tramp.el --- Transparent Remote Access, Multiple Protocol | 2 ;;; tramp.el --- Transparent Remote Access, Multiple Protocol |
3 | 3 |
4 ;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004, | 4 ;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004, |
5 ;; 2005, 2006, 2007 Free Software Foundation, Inc. | 5 ;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. |
6 | 6 |
7 ;; (copyright statements below in code to be updated with the above notice) | 7 ;; (copyright statements below in code to be updated with the above notice) |
8 | 8 |
9 ;; Author: Kai Gro,A_(Bjohann <kai.grossjohann@gmx.net> | 9 ;; Author: Kai Gro,A_(Bjohann <kai.grossjohann@gmx.net> |
10 ;; Michael Albinus <michael.albinus@gmx.de> | 10 ;; Michael Albinus <michael.albinus@gmx.de> |
1797 on the remote host.") | 1797 on the remote host.") |
1798 | 1798 |
1799 (defvar tramp-perl-encode | 1799 (defvar tramp-perl-encode |
1800 "%s -e ' | 1800 "%s -e ' |
1801 # This script contributed by Juanma Barranquero <lektu@terra.es>. | 1801 # This script contributed by Juanma Barranquero <lektu@terra.es>. |
1802 # Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007 | 1802 # Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007, 2008 |
1803 # Free Software Foundation, Inc. | 1803 # Free Software Foundation, Inc. |
1804 use strict; | 1804 use strict; |
1805 | 1805 |
1806 my %%trans = do { | 1806 my %%trans = do { |
1807 my $i = 0; | 1807 my $i = 0; |
1840 This string is passed to `format', so percent characters need to be doubled.") | 1840 This string is passed to `format', so percent characters need to be doubled.") |
1841 | 1841 |
1842 (defvar tramp-perl-decode | 1842 (defvar tramp-perl-decode |
1843 "%s -e ' | 1843 "%s -e ' |
1844 # This script contributed by Juanma Barranquero <lektu@terra.es>. | 1844 # This script contributed by Juanma Barranquero <lektu@terra.es>. |
1845 # Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007 | 1845 # Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007, 2008 |
1846 # Free Software Foundation, Inc. | 1846 # Free Software Foundation, Inc. |
1847 use strict; | 1847 use strict; |
1848 | 1848 |
1849 my %%trans = do { | 1849 my %%trans = do { |
1850 my $i = 0; | 1850 my $i = 0; |